perm filename DATA.BCH[TIM,LSP]16 blob
sn#774545 filedate 1984-10-31 generic text, type C, neo UTF8
COMMENT ⊗ VALID 00025 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00003 00002 (declare (special *benchmark-info* *benchmark-info-real*
C00020 00003 Impl cpu gc cpu+gc real page
C00042 00004 (setq *data*
C00045 00005 (boyer
C00048 00006 (browse
C00051 00007 (destru
C00054 00008 (traverse
C00060 00009 (tak
C00063 00010 (stak
C00066 00011 (ctak
C00069 00012 (takl
C00072 00013 (takr
C00075 00014 (deriv
C00078 00015 (dderiv
C00080 00016 (fdderiv
C00081 00017 (div2
C00088 00018 (fft
C00090 00019 (puzzle
C00092 00020 (triang
C00094 00021 (fread
C00097 00022 (fprint
C00100 00023 (tprint
C00103 00024 (frpoly
C00128 00025 Routines to access the data base
C00141 ENDMK
C⊗;
(declare (special *benchmark-info* *benchmark-info-real*
*benchmark-info-cpu* *report-type*))
(setq *benchmarks*
'(boyer browse destru traverse
tak stak ctak takl takr deriv dderiv fdderiv
div2 fft puzzle triang
fprint fread tprint frpoly))
(defun report-real ()
(setq *report-type* 'real)
(setq *benchmark-info*
`(
(Title
((center) "Benchmark" (entry id)))
(Boyer
((blankline))
((center) "Boyer" (entry real-time))
((blankline)))
(Browse
((blankline))
((center) "Browse" (entry real-time))
((blankline)))
(Destru
((blankline))
((center) "Destruct" (entry real-time))
((blankline)))
(Traverse
((blankline))
((indent 0) "Traverse")
((center) "Initialize" (entry tinit-real-time))
((center) "Traverse" (entry traverse-real-time))
((blankline)))
(Tak
((blankline))
((center) "Tak" (entry real-time))
((blankline)))
(Takl
((blankline))
((center) "Takl" (entry real-time))
((blankline)))
(Takr
((blankline))
((center) "Takr" (entry real-time))
((blankline)))
(STak
((blankline))
((center) "STak" (entry real-time))
((blankline)))
(CTak
((blankline))
((center) "CTak" (entry real-time))
((blankline)))
(Deriv
((blankline))
((center) "Deriv" (entry real-time))
((blankline)))
(DDeriv
((blankline))
((center) "DDeriv" (entry real-time))
((blankline)))
(FDDeriv
((blankline))
((center) "Fdderiv" (entry real-time))
((blankline)))
(Div2
((blankline))
((indent 0) "Div2")
((center) "Iterative" (entry iterative-real-time))
((center) "Recursive" (entry recursive-real-time))
((blankline)))
(FFT
((blankline))
((center) "FFT" (entry real-time))
((blankline)))
(Puzzle
((blankline))
((center) "Puzzle" (entry real-time))
((blankline)))
(Triang
((blankline))
((center) "Triang" (entry real-time))
((blankline)))
(Fread
((blankline))
((center) "Fread" (entry real-time))
((blankline)))
(Fprint
((blankline))
((center) "Fprint" (entry real-time))
((blankline)))
(Tprint
((blankline))
((center) "Tprint" (entry real-time))
((blankline)))
(Frpoly
((blankline))
((indent 0) "Frpoly")
((indent 1) "Power = 2")
((indent 2) "r=x+y+z+1" (entry 2r-real-time))
((indent 2) "r2=1000*r" (entry 2r2-real-time))
((indent 2) "r3=r in flonums" (entry 2r3-real-time))
((blankline))
((indent 1) "Power = 5")
((indent 2) "r=x+y+z+1" (entry 5r-real-time))
((indent 2) "r2=1000*r" (entry 5r2-real-time))
((indent 2) "r3=r in flonums" (entry 5r3-real-time))
((blankline))
((indent 1) "Power = 10")
((indent 2) "r=x+y+z+1" (entry 10r-real-time))
((indent 2) "r2=1000*r" (entry 10r2-real-time))
((indent 2) "r3=r in flonums" (entry 10r3-real-time))
((blankline))
((indent 1) "Power = 15")
((indent 2) "r=x+y+z+1" (entry 15r-real-time))
((indent 2) "r2=1000*r" (entry 15r2-real-time))
((indent 2) "r3=r in flonums" (entry 15r3-real-time))
((blankline)))))
t)
(defun report-cpu ()
(setq *report-type* 'cpu)
(setq *benchmark-info*
`(
(Title
((center) "Benchmark" (entry id)))
(Boyer
((blankline))
((center) "Boyer" (entry cpu-time))
((blankline)))
(Browse
((blankline))
((center) "Browse" (entry cpu-time))
((blankline)))
(Destru
((blankline))
((center) "Destruct" (entry cpu-time))
((blankline)))
(Traverse
((blankline))
((indent 0) "Traverse")
((center) "Initialize" (entry tinit-cpu-time))
((center) "Traverse" (entry traverse-cpu-time))
((blankline)))
(Tak
((blankline))
((center) "Tak" (entry cpu-time))
((blankline)))
(Takl
((blankline))
((center) "Takl" (entry cpu-time))
((blankline)))
(Takr
((blankline))
((center) "Takr" (entry cpu-time))
((blankline)))
(STak
((blankline))
((center) "STak" (entry cpu-time))
((blankline)))
(CTak
((blankline))
((center) "CTak" (entry cpu-time))
((blankline)))
(Deriv
((blankline))
((center) "Deriv" (entry cpu-time))
((blankline)))
(DDeriv
((blankline))
((center) "DDeriv" (entry cpu-time))
((blankline)))
(FDDeriv
((blankline))
((center) "Fdderiv" (entry cpu-time))
((blankline)))
(Div2
((blankline))
((indent 0) "Div2")
((center) "Iterative" (entry iterative-cpu-time))
((center) "Recursive" (entry recursive-cpu-time))
((blankline)))
(FFT
((blankline))
((center) "FFT" (entry cpu-time))
((blankline)))
(Puzzle
((blankline))
((center) "Puzzle" (entry cpu-time))
((blankline)))
(Triang
((blankline))
((center) "Triang" (entry cpu-time))
((blankline)))
(Fread
((blankline))
((center) "Fread" (entry cpu-time))
((blankline)))
(Fprint
((blankline))
((center) "Fprint" (entry cpu-time))
((blankline)))
(Tprint
((blankline))
((center) "Tprint" (entry cpu-time))
((blankline)))
(Frpoly
((blankline))
((indent 0) "Frpoly")
((indent 1) "Power = 2")
((indent 2) "r=x+y+z+1" (entry 2r-cpu-time))
((indent 2) "r2=1000*r" (entry 2r2-cpu-time))
((indent 2) "r3=r in flonums" (entry 2r3-cpu-time))
((blankline))
((indent 1) "Power = 5")
((indent 2) "r=x+y+z+1" (entry 5r-cpu-time))
((indent 2) "r2=1000*r" (entry 5r2-cpu-time))
((indent 2) "r3=r in flonums" (entry 5r3-cpu-time))
((blankline))
((indent 1) "Power = 10")
((indent 2) "r=x+y+z+1" (entry 10r-cpu-time))
((indent 2) "r2=1000*r" (entry 10r2-cpu-time))
((indent 2) "r3=r in flonums" (entry 10r3-cpu-time))
((blankline))
((indent 1) "Power = 15")
((indent 2) "r=x+y+z+1" (entry 15r-cpu-time))
((indent 2) "r2=1000*r" (entry 15r2-cpu-time))
((indent 2) "r3=r in flonums" (entry 15r3-cpu-time))
((blankline)))))
t)
(report-real)
(defun treport-real ()
(setq *report-type* 'real)
(setq *benchmark-info* *benchmark-info-real*)
t)
(defun treport-cpu ()
(setq *report-type* 'cpu)
(setq *benchmark-info* *benchmark-info-cpu*)
t)
(setq *benchmark-info-real*
`(
(Title
("\hfil Benchmark\hfil" (entry id)))
(Boyer
("\hfil Boyer\hfil" (entry real-time)))
(Browse
("\hfil Browse\hfil" (entry real-time)))
(Destru
("\hfil Destruct\hfil" (entry real-time)))
(Traverse
("Traverse\hfil")
("\hfil Initialize\hfil" (entry tinit-real-time))
("\hfil Traverse\hfil" (entry traverse-real-time)))
(Tak
("\hfil Tak\hfil" (entry real-time)))
(Takl
("\hfil Takl\hfil" (entry real-time)))
(Takr
("\hfil Takr\hfil" (entry real-time)))
(STak
("\hfil STak\hfil" (entry real-time)))
(CTak
("\hfil CTak\hfil" (entry real-time)))
(Deriv
("\hfil Deriv\hfil" (entry real-time)))
(DDeriv
("\hfil DDeriv\hfil" (entry real-time)))
(FDDeriv
("\hfil Fdderiv\hfil" (entry real-time)))
(Div2
("Div2\hfil")
("\hfil Iterative\hfil" (entry iterative-real-time))
("\hfil Recursive\hfil" (entry recursive-real-time)))
(FFT
("\hfil FFT\hfil" (entry real-time)))
(Puzzle
("\hfil Puzzle\hfil" (entry real-time)))
(Triang
("\hfil Triang\hfil" (entry real-time)))
(Fread
("\hfil Fread\hfil" (entry real-time)))
(Fprint
("\hfil Fprint\hfil" (entry real-time)))
(Tprint
("\hfil Tprint\hfil" (entry real-time)))
(Frpoly
("Frpoly\hfil")
("\hfil$\hbox{Power}=2$\hfil")
("\hfil$r=x+y+z+1$\hfil" (entry 2r-real-time))
("\hfil$r2=1000r$\hfil" (entry 2r2-real-time))
("\hfil$r3=r$ in flonums\hfil" (entry 2r3-real-time))
("\hfil$\hbox{Power}=5$\hfil")
("\hfil$r=x+y+z+1$\hfil" (entry 5r-real-time))
("\hfil$r2=1000r$\hfil" (entry 5r2-real-time))
("\hfil$r3=r$ in flonums\hfil" (entry 5r3-real-time))
("\hfil$\hbox{Power}=10$\hfil")
("\hfil$r=x+y+z+1$\hfil" (entry 10r-real-time))
("\hfil$r2=1000r$\hfil" (entry 10r2-real-time))
("\hfil$r3=r$ in flonums\hfil" (entry 10r3-real-time))
("\hfil$\hbox{Power}=15$\hfil")
("\hfil$r=x+y+z+1$\hfil" (entry 15r-real-time))
("\hfil$r2=1000r$\hfil" (entry 15r2-real-time))
("\hfil$r3=r$ in flonums\hfil" (entry 15r3-real-time)))))
(setq *benchmark-info-cpu*
`(
(Title
("\hfil Benchmark\hfil" (entry id)))
(Boyer
("\hfil Boyer\hfil" (entry cpu-time)))
(Browse
("\hfil Browse\hfil" (entry cpu-time)))
(Destru
("\hfil Destruct\hfil" (entry cpu-time)))
(Traverse
("Traverse\hfil")
("\hfil Initialize\hfil" (entry tinit-cpu-time))
("\hfil Traverse\hfil" (entry traverse-cpu-time)))
(Tak
("\hfil Tak\hfil" (entry cpu-time)))
(Takl
("\hfil Takl\hfil" (entry cpu-time)))
(Takr
("\hfil Takr\hfil" (entry cpu-time)))
(STak
("\hfil STak\hfil" (entry cpu-time)))
(CTak
("\hfil CTak\hfil" (entry cpu-time)))
(Deriv
("\hfil Deriv\hfil" (entry cpu-time)))
(DDeriv
("\hfil DDeriv\hfil" (entry cpu-time)))
(FDDeriv
("\hfil Fdderiv\hfil" (entry cpu-time)))
(Div2
("Div2\hfil")
("\hfil Iterative\hfil" (entry iterative-cpu-time))
("\hfil Recursive\hfil" (entry recursive-cpu-time)))
(FFT
("\hfil FFT\hfil" (entry cpu-time)))
(Puzzle
("\hfil Puzzle\hfil" (entry cpu-time)))
(Triang
("\hfil Triang\hfil" (entry cpu-time)))
(Fread
("\hfil Fread\hfil" (entry cpu-time)))
(Fprint
("\hfil Fprint\hfil" (entry cpu-time)))
(Tprint
("\hfil Tprint\hfil" (entry cpu-time)))
(Frpoly
("Frpoly\hfil")
("\hfil$\hbox{Power}=2$\hfil")
("\hfil$r=x+y+z+1$\hfil" (entry 2r-cpu-time))
("\hfil$r2=1000r$\hfil" (entry 2r2-cpu-time))
("\hfil$r3=r$ in flonums\hfil" (entry 2r3-cpu-time))
("\hfil$\hbox{Power}=5$\hfil")
("\hfil$r=x+y+z+1$\hfil" (entry 5r-cpu-time))
("\hfil$r2=1000r$\hfil" (entry 5r2-cpu-time))
("\hfil$r3=r$ in flonums\hfil" (entry 5r3-cpu-time))
("\hfil$\hbox{Power}=10$\hfil")
("\hfil$r=x+y+z+1$\hfil" (entry 10r-cpu-time))
("\hfil$r2=1000r$\hfil" (entry 10r2-cpu-time))
("\hfil$r3=r$ in flonums\hfil" (entry 10r3-cpu-time))
("\hfil$\hbox{Power}=15$\hfil")
("\hfil$r=x+y+z+1$\hfil" (entry 15r-cpu-time))
("\hfil$r2=1000r$\hfil" (entry 15r2-cpu-time))
("\hfil$r3=r$ in flonums\hfil" (entry 15r3-cpu-time)))))
;;; Impl cpu gc cpu+gc real page
;;; Entry is:
;;; (impl-name (...(tex-name (cpuf gcf cpu+gcf realf pagef))...))
(setq *all-implementations*
'(
(sail (("\hfil SAIL\hfil" (cpuf gcf add-cpuf+gcf wholinef ()))))
(lmi (("\hfil Lambda\hfil" (cpuf () () () pagef))))
(ti-exp (("\hfil Explorer\hfil" (cpuf () () () pagef))))
(lmi-mc (("\hfil Lambda (MC)\hfil" (cpuf () () () pagef))))
(s3600 (("\hfil 3600\hfil" (cpuf () () () pagef))))
(s3600ifu (("\hfil $3600+\hbox{IFU}$\hfil" (cpuf () () () pagef))))
(d1 (("\hfil Dandelion\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(d2 (("\hfil Dolphin\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(d3 (("\hfil Dorado\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(s-1 (("\hfil S-1\hfil" (() () () realf ()))))
(psl20 (("\hfil PSL-20\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl3081 (("\hfil PSL-3081\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl-cray (("\hfil PSL-Cray\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl750 (("\hfil PSL-750\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl750vms (("\hfil PSL-750 (VMS)\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl780 (("\hfil PSL-780\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl-dn300 (("\hfil PSL-DN300\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl-dn600 (("\hfil PSL-DN600\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl-dn160 (("\hfil PSL-DN160\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl-hp200 (("\hfil PSL-HP200\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(psl-hp-ux (("\hfil PSL-HP-UX\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(interlispvax780 (("\hfil InterLispVax 780\hfil" (() () cpu+gcf ()()))))
(s3600fpa (("\hfil $3600+\hbox{FPA}$\hfil" (cpuf () () () pagef))))
(NIL750 (("\hfil 750 NIL\hfil" (cpuf () () realf ()))))
(dec8600cl (("\hfil 8600 CL\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(dec780cl (("\hfil 780 CL\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(dec785cl (("\hfil 785 CL\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(dec750cl (("\hfil 750 CL\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(dec730cl (("\hfil 730 CL\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(perq (("\hfil Perq\hfil" (() () () realf ()))))
(franz750 (("750 Franz\hfil" ())
("\hfil TrlOn \& LclfYes\hfil" (fony-cpuf fony-gcf fony-cpuf+gcf () ()))
("\hfil TrlOn \& LclfNo\hfil" (fonn-cpuf fonn-gcf fonn-cpuf+gcf () ()))
("\hfil TrlOff \& LclfYes\hfil" (foffy-cpuf foffy-gcf foffy-cpuf+gcf () ()))
("\hfil TrlOff \& LclfNo\hfil" (foffn-cpuf foffn-gcf foffn-cpuf+gcf () ()))))
(franz780 (("780 Franz\hfil" ())
("\hfil TrlOn \& LclfYes\hfil" (fony-cpuf fony-gcf fony-cpuf+gcf () ()))
("\hfil TrlOn \& LclfNo\hfil" (fonn-cpuf fonn-gcf fonn-cpuf+gcf () ()))
("\hfil TrlOff \& LclfYes\hfil" (foffy-cpuf foffy-gcf foffy-cpuf+gcf () ()))
("\hfil TrlOff \& LclfNo\hfil" (foffn-cpuf foffn-gcf foffn-cpuf+gcf () ()))))
(franz68k (("Franz 68000\hfil" ())
("\hfil TrlOn \& LclfYes\hfil" (fony-cpuf fony-gcf fony-cpuf+gcf () ()))
("\hfil TrlOn \& LclfNo\hfil" (fonn-cpuf fonn-gcf fonn-cpuf+gcf () ()))
("\hfil TrlOff \& LclfYes\hfil" (foffy-cpuf foffy-gcf foffy-cpuf+gcf () ()))
("\hfil TrlOff \& LclfNo\hfil" (foffn-cpuf foffn-gcf foffn-cpuf+gcf () ()))))
(interlisp-10 (("\hfil InterLisp-10\hfil" (cpuf gcf add-cpuf+gcf () ()))))
(lm2 (("\hfil LM-2\hfil" (() () () realf ()))))
))
;;; These are of the form:
;;; (... (sub-impl impl (tex-string stuff))...)
(setq *all-implementations-flattened*
'(
(s3600fpa s3600fpa ("\hfil $3600+\hbox{FPA}$\hfil" (cpuf () () () pagef)))
(s3600 s3600 ("\hfil 3600\hfil" (cpuf () () () pagef)))
(s3600ifu ("\hfil $3600+\hbox{IFU}$\hfil" (cpuf () () () pagef)))
(lmi lmi ("\hfil Lambda\hfil" (cpuf () () () pagef)))
(ti-exp ti-exp ("\hfil Explorer\hfil" (cpuf () () () pagef)))
(lmi-mc lmi-mc ("\hfil Lambda (M-C)\hfil" (cpuf () () () pagef)))
(d1 d1 ("\hfil Dandelion\hfil" (cpuf gcf add-cpuf+gcf () ())))
(d2 d2 ("\hfil Dolphin\hfil" (cpuf gcf add-cpuf+gcf () ())))
(d3 d3 ("\hfil Dorado\hfil" (cpuf gcf add-cpuf+gcf () ())))
(lm2 lm2 ("\hfil LM-2\hfil" (() () () realf ())))
(sail sail ("\hfil SAIL\hfil" (cpuf gcf add-cpuf+gcf wholinef ())))
(psl20 psl20 ("\hfil PSL-20\hfil" (cpuf gcf add-cpuf+gcf () ())))
(s-1 s-1 ("\hfil S-1\hfil" (() () () realf ())))
(psl-cray psl-cray ("\hfil PSL-Cray\hfil" (cpuf gcf add-cpuf+gcf () ())))
(psl-3081 psl-3081 ("\hfil PSL-3081\hfil" (cpuf gcf add-cpuf+gcf () ())))
(psl750 psl750 ("\hfil PSL-750\hfil" (cpuf gcf add-cpuf+gcf () ())))
(psl750vms psl750vms ("\hfil PSL-750 (VMS)\hfil" (cpuf gcf add-cpuf+gcf () ())))
(psl780 psl780 ("\hfil PSL-780\hfil" (cpuf gcf add-cpuf+gcf () ())))
(psl-dn300 psl-dn300 ("\hfil PSL-DN300\hfil" (cpuf gcf add-cpuf+gcf () ())))
(psl-dn600 psl-dn600 ("\hfil PSL-DN600\hfil" (cpuf gcf add-cpuf+gcf () ())))
(psl-dn160 psl-dn160 ("\hfil PSL-DN160\hfil" (cpuf gcf add-cpuf+gcf () ())))
(psl-hp200 psl-hp200 ("\hfil PSL-HP200\hfil" (cpuf gcf add-cpuf+gcf () ())))
(psl-hp-ux psl-hp-ux ("\hfil PSL-HP-UX\hfil" (cpuf gcf add-cpuf+gcf () ())))
(interlisp-10 interlisp-10 ("\hfil InterLisp-10\hfil" (cpuf gcf add-cpuf+gcf () ())))
(interlispvax780 interlispvax780
("\hfil InterLispVax 780\hfil" (() () cpu+gcf ()())))
(dec780cl dec780cl ("\hfil 780 CL\hfil" (cpuf gcf add-cpuf+gcf () ())))
(dec8600cl dec8600cl ("\hfil 8600 CL\hfil" (cpuf gcf add-cpuf+gcf () ())))
(dec785cl dec785cl ("\hfil 785 CL\hfil" (cpuf gcf add-cpuf+gcf () ())))
(dec750cl dec750cl ("\hfil 750 CL\hfil" (cpuf gcf add-cpuf+gcf () ())))
(dec730cl dec730cl ("\hfil 730 CL\hfil" (cpuf gcf add-cpuf+gcf () ())))
(NIL750 nil750 ("\hfil 750 NIL\hfil" (cpuf () () realf ())))
(perq perq ("\hfil Perq\hfil" (() () () realf ())))
(franz750yy franz750
("\hfil 750 Franz (TrlOn \& LclfYes)\hfil" (fony-cpuf fony-gcf fony-cpuf+gcf () ())))
(franz750yn franz750
("\hfil 750 Franz (TrlOn \& LclfNo)\hfil" (fonn-cpuf fonn-gcf fonn-cpuf+gcf () ())))
(franz750ny franz750
("\hfil 750 Franz (TrlOff \& LclfYes)\hfil" (foffy-cpuf foffy-gcf foffy-cpuf+gcf () ())))
(franz750nn franz750
("\hfil 750 Franz (TrlOff \& LclfNo)\hfil" (foffn-cpuf foffn-gcf foffn-cpuf+gcf () ())))
(franz780yy franz780
("\hfil 780 Franz (TrlOn \& LclfYes)\hfil" (fony-cpuf fony-gcf fony-cpuf+gcf () ())))
(franz780yn franz780
("\hfil 780 Franz (TrlOn \& LclfNo)\hfil" (fonn-cpuf fonn-gcf fonn-cpuf+gcf () ())))
(franz780ny franz780
("\hfil 780 Franz (TrlOff \& LclfYes)\hfil" (foffy-cpuf foffy-gcf foffy-cpuf+gcf () ())))
(franz780nn franz780
("\hfil 780 Franz (TrlOff \& LclfNo)\hfil" (foffn-cpuf foffn-gcf foffn-cpuf+gcf () ())))
(franz68kyy franz68k
("\hfil Franz 68000 (TrlOn \& LclfYes)\hfil" (fony-cpuf fony-gcf fony-cpuf+gcf () ())))
(franz68kyn franz68k
("\hfil Franz 68000 (TrlOn \& LclfNo)\hfil" (fonn-cpuf fonn-gcf fonn-cpuf+gcf () ())))
(franz68kny franz68k
("\hfil Franz 68000 (TrlOff \& LclfYes)\hfil" (foffy-cpuf foffy-gcf foffy-cpuf+gcf () ())))
(franz68knn franz68k
("\hfil Franz 68000 (TrlOff \& LclfNo)\hfil" (foffn-cpuf foffn-gcf foffn-cpuf+gcf () ())))
))
(defun cpuf (entry) (flassq 'cpu entry))
(defun gcf (entry) (flassq 'gc entry))
(defun wholinef (entry) (flassq 'wholine entry))
(defun realf (entry) (flassq 'real entry))
(defun cpu+gcf (entry) (flassq 'cpu+gc entry))
(defun pagef (entry) (flassq 'page entry))
(defun add-cpuf+gcf (entry) (safe-plus (flassq 'cpu entry)
(flassq 'gc entry)))
(defun fony-cpuf (entry) (flassq 'cpu (locate 'trlon 'lclfyes entry)))
(defun fony-gcf (entry) (flassq 'gc (locate 'trlon 'lclfyes entry)))
(defun fony-cpuf+gcf (entry) (safe-plus
(flassq 'cpu (locate 'trlon 'lclfyes entry))
(flassq 'gc (locate 'trlon 'lclfyes entry))))
(defun fonn-cpuf (entry) (flassq 'cpu (locate 'trlon 'lclfno entry)))
(defun fonn-gcf (entry) (flassq 'gc (locate 'trlon 'lclfno entry)))
(defun fonn-cpuf+gcf (entry) (safe-plus
(flassq 'cpu (locate 'trlon 'lclfno entry))
(flassq 'gc (locate 'trlon 'lclfno entry))))
(defun foffy-cpuf (entry) (flassq 'cpu (locate 'trloff 'lclfyes entry)))
(defun foffy-gcf (entry) (flassq 'gc (locate 'trloff 'lclfyes entry)))
(defun foffy-cpuf+gcf (entry) (safe-plus
(flassq 'cpu (locate 'trloff 'lclfyes entry))
(flassq 'gc (locate 'trloff 'lclfyes entry))))
(defun foffn-cpuf (entry) (flassq 'cpu (locate 'trloff 'lclfno entry)))
(defun foffn-gcf (entry) (flassq 'gc (locate 'trloff 'lclfno entry)))
(defun foffn-cpuf+gcf (entry) (safe-plus
(flassq 'cpu (locate 'trloff 'lclfno entry))
(flassq 'gc (locate 'trloff 'lclfno entry))))
(setq *all-benchmarks*
'((tak "Tak" identity)
(takl "Takl" identity)
(stak "Stak" identity)
(ctak "Ctak" identity)
(takr "Takr" identity)
(div2-iterative "Iterative Div2" it-div-entry)
(div2-recursive "Recursive Div2" rec-div-entry)
(deriv "Deriv" identity)
(dderiv "Dderiv" identity)
(fdderiv "Fdderiv" identity)
(boyer "Boyer" identity)
(browse "Browse" identity)
(destru "Destructive" identity)
(traverse-init "Traverse Initialization" traverse-init-entry)
(traverse-traverse "Traverse" traverse-traverse-entry)
(puzzle "Puzzle" identity)
(triang "Triang" identity)
(fread "Fread" identity)
(fprint "Fprint" identity)
(tprint "Tprint" identity)
(fft "FFT" identity)
(frpoly-2r "Frpoly $\hbox{Power} = 2$ $r = x+y+z+1$" frp-2r-entry)
(frpoly-2r2 "Frpoly $\hbox{Power} = 2$ $r2 = 1000r$" frp-2r2-entry)
(frpoly-2r3 "Frpoly $\hbox{Power} = 2$ $r3 = r$ in flonums" frp-2r3-entry)
(frpoly-5r "Frpoly $\hbox{Power} = 5$ $r = x+y+z+1$" frp-5r-entry)
(frpoly-5r2 "Frpoly $\hbox{Power} = 5$ $r2 = 1000r$" frp-5r2-entry)
(frpoly-5r3 "Frpoly $\hbox{Power} = 5$ $r3 = r$ in flonums" frp-5r3-entry)
(frpoly-10r "Frpoly $\hbox{Power} = 10$ $r = x+y+z+1$" frp-10r-entry)
(frpoly-10r2 "Frpoly $\hbox{Power} = 10$ $r2 = 1000r$" frp-10r2-entry)
(frpoly-10r3 "Frpoly $\hbox{Power} = 10$ $r3 = r$ in flonums" frp-10r3-entry)
(frpoly-15r "Frpoly $\hbox{Power} = 15$ $r = x+y+z+1$" frp-15r-entry)
(frpoly-15r2 "Frpoly $\hbox{Power} = 15$ $r2 = 1000r$" frp-15r2-entry)
(frpoly-15r3 "Frpoly $\hbox{Power} = 15$ $r3 = r$ in flonums" frp-15r3-entry)))
(defun identity (x) x)
(defun it-div-entry (x) (cadr (assq 'iterative x)))
(defun rec-div-entry (x) (cadr (assq 'recursive x)))
(defun traverse-init-entry (x) (cadr (assq 'initialize x)))
(defun traverse-traverse-entry (x) (cadr (assq 'traverse x)))
(defun frp-2r-entry (x) (cadr (assq '2r x)))
(defun frp-2r2-entry (x) (cadr (assq '2r2 x)))
(defun frp-2r3-entry (x) (cadr (assq '2r3 x)))
(defun frp-5r-entry (x) (cadr (assq '5r x)))
(defun frp-5r2-entry (x) (cadr (assq '5r2 x)))
(defun frp-5r3-entry (x) (cadr (assq '5r3 x)))
(defun frp-10r-entry (x) (cadr (assq '10r x)))
(defun frp-10r2-entry (x) (cadr (assq '10r2 x)))
(defun frp-10r3-entry (x) (cadr (assq '10r3 x)))
(defun frp-15r-entry (x) (cadr (assq '15r x)))
(defun frp-15r2-entry (x) (cadr (assq '15r2 x)))
(defun frp-15r3-entry (x) (cadr (assq '15r3 x)))
(setq *subset-relationships*
'((tak (tak))
(takl (takl))
(stak (stak))
(ctak (Ctak))
(boyer (Boyer))
(fft (FFT))
(deriv (deriv))
(dderiv (Dderiv))
(fdderiv (Fdderiv))
(takr (Takr))
(puzzle (Puzzle))
(triang (Triang))
(destru (destru))
(fread (Fread))
(browse (browse))
(fprint (Fprint))
(tprint (Tprint))
(div2 (div2-iterative div2-recursive))
(traverse (traverse-init traverse-traverse))
(frpoly (frpoly-2r frpoly-2r2 frpoly-2r3
frpoly-5r frpoly-5r2 frpoly-5r3
frpoly-10r frpoly-10r2 frpoly-10r3
frpoly-15r frpoly-15r2 frpoly-15r3))))
(setq *selectors*
'((tak
((real real-time)
(cpu cpu-time)))
(takl
((real real-time)
(cpu cpu-time)))
(stak
((real real-time)
(cpu cpu-time)))
(ctak
((real real-time)
(cpu cpu-time)))
(boyer
((real real-time)
(cpu cpu-time)))
(fft
((real real-time)
(cpu cpu-time)))
(deriv
((real real-time)
(cpu cpu-time)))
(dderiv
((real real-time)
(cpu cpu-time)))
(fdderiv
((real real-time)
(cpu cpu-time)))
(takr
((real real-time)
(cpu cpu-time)))
(puzzle
((real real-time)
(cpu cpu-time)))
(triang
((real real-time)
(cpu cpu-time)))
(destru
((real real-time)
(cpu cpu-time)))
(fread
((real real-time)
(cpu cpu-time)))
(browse
((real real-time)
(cpu cpu-time)))
(fprint
((real real-time)
(cpu cpu-time)))
(tprint
((real real-time)
(cpu cpu-time)))
(div2-iterative
((real real-time)
(cpu cpu-time)))
(div2-recursive
((real real-time)
(cpu cpu-time)))
(traverse-init
((real real-time)
(cpu cpu-time)))
(traverse-traverse
((real real-time)
(cpu cpu-time)))
(frpoly-2r
((real real-time)
(cpu cpu-time)))
(frpoly-2r2
((real real-time)
(cpu cpu-time)))
(frpoly-2r3
((real real-time)
(cpu cpu-time)))
(frpoly-5r
((real real-time)
(cpu cpu-time)))
(frpoly-5r2
((real real-time)
(cpu cpu-time)))
(frpoly-5r3
((real real-time)
(cpu cpu-time)))
(frpoly-10r
((real real-time)
(cpu cpu-time)))
(frpoly-10r2
((real real-time)
(cpu cpu-time)))
(frpoly-10r3
((real real-time)
(cpu cpu-time)))
(frpoly-15r
((real real-time)
(cpu cpu-time)))
(frpoly-15r2
((real real-time)
(cpu cpu-time)))
(frpoly-15r3
((real real-time)
(cpu cpu-time)))))
(setq *data*
'(
(title
(perq "Perq")
(sail "SAIL")
(s-1 "S-1")
(franz68k "Franz 68000")
(psl20 "PSL-20")
(psl-cray "PSL-Cray")
(psl-3081 "PSL-3081")
(psl750 "PSL-750")
(psl750vms "PSL-750 (VMS)")
(psl780 "PSL-780")
(psl-dn300 "PSL-DN300")
(psl-dn600 "PSL-DN600")
(psl-dn160 "PSL-DN160")
(psl-hp200 "PSL-HP200")
(psl-hp-ux "PSL-HP-UX")
(d1 "Dandelion")
(d2 "Dolphin")
(interlispvax780 "InterLispVax 780")
(d3 "Dorado")
(s3600 "3600")
(s3600ifu "3600+IFU")
(lmi-nc "Lambda (No Cache)")
(ti-exp "Explorer")
(lmi "Lambda")
(lmi-mc "Lambda (M-C)")
(s3600fpa "3600+FPA")
(franz750 "750 Franz")
(franz780 "780 Franz")
(interlisp-10 "InterLisp-10")
((safe-quotient interlisp-10 sail) "IL-10//SAIL")
((safe-quotient d3 s3600) "Dorado//3600")
((safe-quotient d1 d2) "Dandelion//Dolphin")
((safe-quotient d2 d3) "Dolphin//Dorado")
((safe-quotient d1 d3) "Dandelion//Dorado")
((safe-quotient sail interlisp-10) "SAIL//IL-10")
((safe-quotient s3600 d3) "3600//Dorado")
((safe-quotient d1 d2) "Dandelion//Dolphin")
((safe-quotient d2 d1) "Dolphin//Dandelion")
((safe-quotient d2 d3) "Dolphin//Dorado")
((safe-quotient d3 d2) "Dorado//Dolphin")
((safe-quotient d1 d3) "Dandelion//Dorado")
((safe-quotient d3 d1) "Dorado//Dandelion")
(lm2 "LM-2")
(dec780cl "780 CL")
(dec8600cl "8600 CL")
(dec730cl "730 CL")
(dec750cl "750 CL")
(dec785cl "785 CL")
(NIL750 "750 NIL"))
(boyer
(sail (cpu 6.47 gc 11.6 wholine 23.5))
(perq (real 134.8))
(s-1 (real 10.03))
(s3600 (cpu 18.49 page 0.08))
(s3600fpa (cpu 18.49 page 0.08))
(s3600ifu (cpu 14.60 page 1.27))
(lmi (cpu 31.7 page 7.2))
(ti-exp (cpu 39.109 page 0.0))
(lmi-mc (cpu 10.7 page 5.1))
(psl20 (cpu 11.96 gc 11.605))
(psl750 (cpu 43.384 gc 40.715))
(psl750vms (cpu 45.65 gc 17.35))
(psl780 (cpu 21.301 gc 19.975))
(psl-dn300 (cpu 46.924 gc 48.585))
(psl-dn600 (cpu 43.7 gc 41.184))
(psl-dn160 (cpu 25.663 gc 15.349))
(psl-hp200 (cpu 25.52 gc 0.0))
(psl-hp-ux (cpu 25.19 gc 7.344))
(psl-cray (cpu 1.852 gc 1.509))
(psl-3081 (cpu 2.346 gc 2.262))
(interlispvax780 (cpu+gc 53.28))
(interlisp-10 (cpu 25.458
gc 27.479))
(lm2 (real 45.0))
(dec730cl (cpu 258.98 gc 180.82))
(dec750cl (cpu 69.38 gc 79.30))
(dec785cl (cpu 30.26 gc 28.38))
(dec780cl (cpu 46.79 gc 40.90))
(dec8600cl (cpu 12.18 gc 14.29))
(d1 (cpu 74.6 gc 44.4))
(d2 (cpu 101.1 gc 31.3))
(d3 (cpu 17.1 gc 13.2))
(franz780 ((trlon (lclfno (cpu 40.17 gc 31.33)))
(trlon (lclfyes (cpu 20.58 gc 31.08)))
(trloff (lclfno (cpu 144.98 gc 21.32)))
(trloff (lclfyes (cpu 21.0 gc 21.35)))))
(franz750 ((trlon (lclfno (cpu 60.55 gc 50.9)))
(trlon (lclfyes (cpu 34.35 gc 50.98)))
(trloff (lclfno (cpu 224.03 gc 34.7)))
(trloff (lclfyes (cpu 34.67 gc 35.03)))))
(franz68k ((trlon (lclfno (cpu 64.38 gc 75.48)))
(trlon (lclfyes (cpu 42.28 gc 75.37)))
(trloff (lclfno (cpu 246.32 gc 51.78)))
(trloff (lclfyes (cpu 42.85 gc 51.58)))))
(NIL750 (cpu 81.33 real 83.78)))
(browse
(sail (cpu 13.64 gc 39.52 wholine 82.68))
(s3600 (cpu 41.01 page 0.72))
(s3600fpa (cpu 41.01 page 0.72))
(s3600ifu (cpu 30.13 page 2.03))
(lmi (cpu 29.2 page 10.3))
(ti-exp (cpu 76.993 page 0.0))
(lmi-mc (cpu 19.8 page 10.9))
(s-1 (real 10.2))
(perq (real 359.63))
(psl20 (cpu 23.819 gc 4.896))
(psl750 (cpu 75.497 gc 16.082))
(psl750vms (cpu 95.7 gc 8.02))
(psl780 (cpu 41.157 gc 9.129))
; (psl-dn600 (cpu 27.296 gc 5.224))
; (psl-dn300 (cpu 28.953 gc 6.245))
; (psl-dn160 (cpu 43.7 gc 41.184))
(psl-hp200 (cpu 39.84 gc 4.61))
(psl-hp-ux (cpu 42.99 gc 6.613))
(psl-cray (cpu 4.704 gc 3.664))
(psl-3081 (cpu 3.849 gc 2.465))
(interlispvax780 (cpu+gc 111.536))
(interlisp-10 (cpu 70.321
gc 26.981))
(lm2 (real 70.21))
(dec730cl (cpu 540.58 gc 380.50))
(dec750cl (cpu 195.11 gc 164.05))
(dec785cl (cpu 73.30 gc 59.30))
(dec780cl (cpu 118.51 gc 86.50))
(dec8600cl (cpu 38.69 gc 30.37))
(d1 (cpu 174.0 gc 126.0))
(d2 (cpu 249.0 gc 82.6))
(d3 (cpu 52.5 gc 41.9))
(franz780 ((trlon (lclfno (cpu 78.25 gc 92.0)))
(trloff (lclfno (cpu 155.53 gc 77.83)))
(trlon (lclfyes (cpu 73.02 gc 88.97)))
(trloff (lclfyes (cpu 135.7 gc 77.3)))))
(franz750 ((trlon (lclfno (cpu 122.67 gc 138.47)))
(trloff (lclfno (cpu 254.43 gc 134.92)))
(trlon (lclfyes (cpu 117.2 gc 137.93)))
(trloff (lclfyes (cpu 212.48 gc 132.53)))))
(franz68k ((trlon (lclfno (cpu 137.38 gc 275.65)))
(trloff (lclfno (cpu 251.77 gc 225.15)))
(trlon (lclfyes (cpu 134.48 gc 275.52)))
(trloff (lclfyes (cpu 227.85 gc 224.77)))))
(NIL750 (cpu 1099.84 real 1226.54)))
(destru
(sail (cpu 2.16 gc 5.38 wholine 8.43))
(s-1 (real 0.91))
(perq (real 17.78))
(s3600 (cpu 3.70 page 0.01))
(s3600fpa (cpu 3.70 page 0.01))
(s3600ifu (cpu 2.64 page 0.02))
(lmi (cpu 4.0 page 1.1))
(ti-exp (cpu 4.8668 page 0.0))
(lmi-mc (cpu 3.0 page 0.7))
(psl20 (cpu 2.381 gc 0.0))
(psl-cray (cpu 0.446 gc 0.0))
(psl780 (cpu 3.876 gc 0.0))
(psl750 (cpu 7.225 gc 0.0))
(psl750vms (cpu 8.4 gc 0.0))
(psl-dn600 (cpu 10.591 gc 0.0))
(psl-dn300 (cpu 10.161 gc 0.0))
(psl-dn160 (cpu 7.43 gc 0.0))
(psl-hp200 (cpu 4.25 gc 0.0))
(psl-hp-ux (cpu 4.69 gc 0.0))
(interlispvax780 (cpu+gc 5.44))
(interlisp-10 (cpu 9.206
gc 1.427))
(lm2 (real 8.54))
(dec730cl (cpu 26.41 gc 0.0))
(dec750cl (cpu 11.3 gc 0.0))
(dec780cl (cpu 6.38 gc 0.0))
(dec8600cl (cpu 2.10 gc 0.0))
(dec785cl (cpu 4.35 gc 0.0))
(d1 (cpu 17.6 gc 9.27))
(d2 (cpu 27.0 gc 7.97))
(d3 (cpu 3.77 gc 3.41))
(franz780 ((trlon (lclfno (cpu 6.95 gc 6.78)))
(trloff (lclfno (cpu 6.95 gc 6.77)))
(trlon (lclfyes (cpu 5.2 gc 6.63)))
(trloff (lclfyes (cpu 6.96 gc 6.7)))))
(franz750 ((trlon (lclfno (cpu 8.68 gc 6.95)))
(trloff (lclfno (cpu 11.02 gc 7.65)))
(trlon (lclfyes (cpu 8.8 gc 6.9)))
(trloff (lclfyes (cpu 11.4 gc 7.72)))))
(franz68k ((trlon (lclfno (cpu 13.98 gc 9.01)))
(trloff (lclfno (cpu 19.13 gc 9.05)))
(trlon (lclfyes (cpu 14.02 gc 9.03)))
(trloff (lclfyes (cpu 19.15 gc 9.05)))))
(NIL750 (cpu 8.95 real 8.96)))
(traverse
(sail ((initialize
(cpu 6.69 gc 45.14 wholine 51.82))
(traverse
(cpu 23.96 gc 0.0 wholine 23.96))))
(s-1 ((initialize
(real 1.93))
(traverse
(real 30.1))))
(perq ((initialize
(real 41.75))
(traverse
(real 490.6))))
(psl20 ((initialize
(cpu 7.596 gc 0.0))
(traverse
(cpu 43.885 gc 0.0))))
(psl-3081 ((initialize
(cpu 1.805 gc 0.0))
(traverse
(cpu 9.896 gc 0.0))))
(psl750 ((initialize
(cpu 35.53 gc 0.0))
(traverse
(cpu 185.657 gc 0.0))))
(psl750vms ((initialize
(cpu 31.2 gc 0.0))
(traverse
(cpu 146.63 gc 0.0))))
(psl-dn160 ((initialize
(cpu 29.84 gc 0.0))
(traverse
(cpu 56.16 gc 0.0))))
(psl-hp-ux ((initialize
(cpu 14.89 gc 0.0))
(traverse
(cpu 102.36 gc 0.0))))
(psl-hp200 ((initialize
(cpu 13.54 gc 0.0))
(traverse
(cpu 108.69 gc 0.0))))
(dec730cl ((initialize (cpu 94.77 gc 0.0))
(traverse (cpu 804.02 gc 0.0))))
(dec750cl ((initialize (cpu 35.45 gc 0.0))
(traverse (cpu 217.21 gc 0.0))))
(dec780cl ((initialize (cpu 20.76 gc 0.0))
(traverse (cpu 161.68 gc 0.0))))
(dec8600cl ((initialize (cpu 6.12 gc 0.0))
(traverse (cpu 40.65 gc 0.0))))
(dec785cl ((initialize (cpu 14.03 gc 0.0))
(traverse (cpu 107.43 gc 0.0))))
(psl780 ((initialize
(cpu 15.062 gc 0.0))
(traverse
(cpu 72.352 gc 0.0))))
(interlispvax780
((initialize (cpu+gc 24.78))
(traverse (cpu+gc 255.76))))
(s3600
((initialize (cpu 9.45 page 0.0))
(traverse (cpu 50.12 page 0.0))))
(s3600fpa
((initialize (cpu 9.45 page 0.0))
(traverse (cpu 50.12 page 0.0))))
(s3600ifu
((initialize (cpu 7.23 page 0.01))
(traverse (cpu 35.48 page 0.0))))
(lmi
((initialize (cpu 18.7 page 1.2))
(traverse (cpu 138.6 page 0.0))))
(ti-exp
((initialize (cpu 26.334 page 0.0))
(traverse (cpu 151.89 page 0.0))))
(lmi-mc
((initialize (cpu 13.7 page 1.7))
(traverse (cpu 47.9 page 0.0))))
(lm2 ((initialize (real 41.23))
(traverse (real 215.68))))
(interlisp-10 ((initialize (cpu 37.62 gc 6.098))
(traverse (cpu 85.862 gc 0.0))))
(d1
((initialize (cpu 48.0 gc 1.16))
(traverse (cpu 181.0 gc 0.0))))
(d2
((initialize (cpu 100.0 gc 1.25))
(traverse (cpu 299.0 gc 0.0))))
(d3
((initialize (cpu 20.5 gc .49))
(traverse (cpu 63.9 gc 0.0))))
(franz780
((initialize ((trlon (lclfno (cpu 18.47 gc 11.8)))
(trloff (lclfno (cpu 18.7 gc 12.73)))
(trlon (lclfyes (cpu 20.42 gc 11.77)))
(trloff (lclfyes (cpu 29.61 gc 12.82)))))
(traverse ((trlon (lclfno (cpu 82.98 gc 0.0)))
(trloff (lclfno (cpu 83.03 gc 0.0)))
(trlon (lclfyes (cpu 156.21 gc 0.0)))
(trloff (lclfyes (cpu 559.58 gc 0.0)))))))
(franz750
((initialize ((trlon (lclfno (cpu 32.98 gc 19.3)))
(trloff (lclfno (cpu 33.18 gc 20.75)))
(trlon (lclfyes (cpu 35.45 gc 19.72)))
(trloff (lclfyes (cpu 51.23 gc 21.03)))))
(traverse ((trlon (lclfno (cpu 132.63 gc 0.0)))
(trloff (lclfno (cpu 132.6 gc 0.0)))
(trlon (lclfyes (cpu 244.01 gc 0.0)))
(trloff (lclfyes (cpu 911.2 gc 0.0)))))))
(nil750
((initialize (cpu 38.93 real 39.72))
(traverse (cpu 273.26 real 273.32)))))
(tak
(sail (cpu .489 gc 0.0 wholine .85))
(perq (real 4.7))
(s-1 (real .295))
(s3600 (cpu .59 page 0.0))
(s3600fpa (cpu .59 page 0.0))
(s3600ifu (cpu .43 page 0.0))
(lmi (cpu 1.6 page 0.0))
(ti-exp (cpu 2.3139 page 0.0))
(lmi-mc (cpu .43 page 0.0))
(lm2 (real 2.9))
(psl20 (Cpu .485 gc 0.0))
(psl-cray (Cpu .044 gc 0.0))
(psl-3081 (Cpu .113 gc 0.0))
(psl780 (cpu 0.833 gc 0.0))
(psl-dn300 (cpu 1.622 gc 0.0))
(psl-dn600 (cpu 1.657 gc 0.0))
(psl-dn160 (cpu 1.95 gc 0.0))
(psl-hp200 (cpu 1.53 gc 0.0))
(psl-hp-ux (cpu 1.51 gc 0.0))
(psl750 (cpu 1.802 gc 0.0))
(psl750vms (cpu 1.37 gc 0.0))
(interlispvax780 (cpu+gc 3.088))
(interlisp-10 (cpu 2.088
gc 0.0))
(dec730cl (cpu 10.55 gc 0.0))
(dec750cl (cpu 2.69 gc 0.0))
(dec780cl (cpu 1.83 gc 0.0))
(dec8600cl (cpu .45 gc 0.0))
(dec785cl (cpu 1.43 gc 0.0))
(d1 (cpu 1.67 gc 0.0))
(d2 (cpu 3.84 gc 0.0))
(d3 (cpu .526 gc 0.0))
(franz68k ((trloff (lclfno (cpu 12.98 gc 0.0)))
(trlon (lclfno (cpu 3.42 gc 0.0)))
(trlon (lclfyes (cpu 2.35 gc 0.0)))
(trloff (lclfyes (cpu 2.43 gc 0.0)))))
(franz780 ((trloff (lclfno (cpu 8.3 gc 0.0)))
(trlon (lclfno (cpu 2.1 gc 0.0)))
(trlon (lclfyes (cpu 1.1 gc 0.0)))
(trloff (lclfyes (cpu 1.1 gc 0.0)))))
(franz750 ((trloff (lclfno (cpu 14.8 gc 0.0)))
(trlon (lclfno (cpu 3.3 gc 0.0)))
(trlon (lclfyes (cpu 1.9 gc 0.0)))
(trloff (lclfyes (cpu 0.9 gc 0.0)))))
(NIL750 (cpu 4.16 real 4.16)))
(stak
(sail (cpu 3.5 gc 0.0 wholine 4.42))
(perq (real 13.5))
(s3600 (cpu 2.58 page 0.0))
(s3600 (cpu 2.30 page 0.0))
(lmi (cpu 6.5 page 0.0))
(ti-exp (cpu 5.7307 page 0.0))
(lmi-mc (cpu 5.4 page 0.0))
(s-1 (real 4.31))
(interlispvax780 (cpu+gc 9.728))
(interlisp-10 (cpu 6.379 gc 0.0))
(psl20 (cpu 2.694 gc 0.0))
(psl-cray (cpu 1.132 gc 0.0))
(psl-3081 (cpu 1.696 gc 0.0))
(psl780 (cpu 7.106 gc 0.0))
(psl-dn300 (cpu 19.44 gc 0.0))
(psl-dn600 (cpu 18.683 gc 0.0))
(psl-dn160 (cpu 11.3 gc 0.0))
(psl-hp200 (cpu 11.71 gc 0.0))
(psl-hp-ux (cpu 12.51 gc 0.0))
(psl750 (cpu 17.782 gc 0.0))
(psl750vms (cpu 19.73 gc 0.0))
(lm2 (real 7.83))
(dec730cl (cpu 20.96 gc 0.0))
(dec750cl (cpu 6.21 gc 0.0))
(dec780cl (cpu 4.11 gc 0.0))
(dec785cl (cpu 2.92 gc 0.0))
(dec8600cl (cpu 1.41 gc 0.0))
(d1 (cpu 4.66 gc 0.0))
(d2 (cpu 12.4 gc 0.0))
(d3 (cpu 1.89 gc 0.0))
(franz780 ((trlon (lclfno (cpu 6.32 gc 0.0)))
(trloff (lclfno (cpu 17.75 gc 0.0)))
(trlon (lclfyes (cpu 3.17 gc 0.0)))
(trloff (lclfyes (cpu 3.15 gc 0.0)))))
(franz750 ((trlon (lclfno (cpu 11.18 gc 0.0)))
(trloff (lclfno (cpu 25.98 gc 0.0)))
(trlon (lclfyes (cpu 5.05 gc 0.0)))
(trloff (lclfyes (cpu 5.01 gc 0.0)))))
(franz68k ((trlon (lclfno (cpu 11.17 gc 0.0)))
(trloff (lclfno (cpu 28.0 gc 0.0)))
(trlon (lclfyes (cpu 9.02 gc 0.0)))
(trloff (lclfyes (cpu 9.02 gc 0.0)))))
(NIL750 (cpu 23.14 real 23.24)))
(ctak
(sail (cpu 2.85 gc 0.0 wholine 4.18))
(s-1 (real .820))
(s3600 (cpu 7.70 page 0.0))
(s3600fpa (cpu 7.70 page 0.0))
(s3600ifu (cpu 5.08 page 0.0))
(lmi (cpu 4.4 page 0.0))
(ti-exp (cpu 4.564 page 0.0))
(perq (real 8.4))
(interlispvax780 (cpu+gc 31.632))
(interlisp-10 (cpu 44.672 gc 0.0))
(psl20 (cpu 2.971 gc 0.0))
(psl-cray (cpu .597 gc 0.0))
(psl-3081 (cpu .821 gc 0.0))
(psl750 (cpu 13.583 gc 0.0))
(psl750vms (cpu 12.08 gc 0.0))
(psl780 (cpu 5.389 gc 0.0))
(psl-dn600 (cpu 12.259 gc 0.0))
(psl-dn300 (cpu 12.433 gc 0.0))
(psl-dn160 (cpu 6.63 gc 0.0))
(psl-hp200 (cpu 9.33 gc 0.0))
(psl-hp-ux (cpu 9.49 gc 0.0))
(lm2 (real 10.43))
(dec730cl (cpu 34.86 gc 0.0))
(dec750cl (cpu 13.86 gc 0.0))
(dec780cl (cpu 8.09 gc 0.0))
(dec8600cl (cpu 2.32 gc 0.0))
(dec785cl (cpu 5.77 gc 0.0))
(d1 (cpu 63.2 gc 0.0))
(d2 (cpu 140.0 gc 0.0))
(d3 (cpu 18.0 gc 0.0))
(franz780 ((trlon (lclfno (cpu 12.05 gc 0.0)))
(trloff (lclfno (cpu 17.8 gc 0.0)))
(trlon (lclfyes (cpu 10.68 gc 0.0)))
(trloff (lclfyes (cpu 10.7 gc 0.0)))))
(franz750 ((trlon (lclfno (cpu 18.35 gc 0.0)))
(trloff (lclfno (cpu 27.05 gc 0.0)))
(trlon (lclfyes (cpu 18.75 gc 0.0)))
(trloff (lclfyes (cpu 18.25 gc 0.0)))))
(franz68k ((trlon (lclfno (cpu 20.75 gc 0.0)))
(trloff (lclfno (cpu 28.46 gc 0.0)))
(trlon (lclfyes (cpu 19.6 gc 0.0)))
(trloff (lclfyes (cpu 19.62 gc 0.0)))))
(NIL750 (cpu 9.92 real 9.92)))
(takl
(sail (cpu 2.81 gc 0.0 wholine 4.03))
(s3600 (cpu 6.45 page 0.0))
(s3600fpa (cpu 6.45 page 0.0))
(s3600ifu (cpu 4.96 page 0.0))
(lmi (cpu 10.7 page 0.0))
(ti-exp (cpu 20.328 page 0.0))
(lmi-mc (cpu 5.4 page 0.0))
(perq (real 24.0))
(s-1 (real 2.92))
(lm2 (real 25.9))
(interlispvax780 (cpu+gc 9.872))
(PSL20 (Cpu 2.527 GC 0.0))
(PSL-cray (Cpu .307 GC 0.0))
(PSL-3081 (Cpu .611 GC 0.0))
(psl750 (cpu 15.453 gc 0.0))
(psl750vms (cpu 12.36 gc 0.0))
(psl780 (cpu 5.27 gc 0.0))
(psl-dn600 (cpu 10.923 gc 0.0))
(psl-dn300 (cpu 12.9 gc 0.0))
(psl-dn160 (cpu 3.98 gc 0.0))
(psl-hp200 (cpu 5.73 gc 0.0))
(psl-hp-ux (cpu 6.39 gc 0.0))
(interlisp-10 (cpu 3.786
gc 0.0))
(dec730cl (cpu 34.15 gc 0.0))
(dec750cl (cpu 12.35 gc 0.0))
(dec780cl (cpu 7.34 gc 0.0))
(dec8600cl (cpu 2.03 gc 0.0))
(dec785cl (cpu 5.41 gc 0.0))
(d1 (cpu 14.0 gc 0.0))
(d2 (cpu 45.6 gc 0.0))
(d3 (cpu 3.62 gc 0.0))
(franz780 ((trlon (lclfno (cpu 9.72 gc 0.0)))
(trloff (lclfno (cpu 24.67 gc 0.0)))
(trlon (lclfyes (cpu 6.17 gc 0.0)))
(trloff (lclfyes (cpu 6.18 gc 0.0)))))
(franz750 ((trlon (lclfno (cpu 18.4 gc 0.0)))
(trloff (lclfno (cpu 47.02 gc 0.0)))
(trlon (lclfyes (cpu 12.6 gc 0.0)))
(trloff (lclfyes (cpu 12.37 gc 0.0)))))
(franz68k ((trlon (lclfno (cpu 19.75 gc 0.0)))
(trloff (lclfno (cpu 49.25 gc 0.0)))
(trlon (lclfyes (cpu 16.18 gc 0.0)))
(trloff (lclfyes (cpu 16.2 gc 0.0)))))
(NIL750 (cpu 39.13 real 39.27)))
(takr
(sail (cpu .488 gc 0.0 wholine 1.18))
(perq (real 7.7))
(lmi (cpu 1.8 page 0.19))
(ti-exp (cpu 2.2945 page 0.0))
(s-1 (real .583))
(s3600 (cpu .59 page 0.0))
(s3600fpa (cpu .59 page 0.0))
(s3600ifu (cpu .43 page 0.0))
(interlispvax780 (cpu+gc 4.96))
(interlisp-10 (cpu 2.162 gc 0.0))
(psl20 (cpu .599 gc 0.0))
(psl-cray (cpu .068 gc 0.0))
(psl-3081 (cpu .129 gc 0.0))
(psl750 (cpu 2.822 gc 0.0))
(psl750vms (cpu 2.14 gc 0.0))
(psl780 (cpu 1.173 gc 0.0))
(psl-dn600 (cpu 2.131 gc 0.0))
(psl-dn300 (cpu 1.755 gc 0.0))
(psl-dn160 (cpu 3.20 gc 0.0))
(psl-hp200 (cpu 1.76 gc 0.0))
(psl-hp-ux (cpu 1.55 gc 0.0))
(lm2 (real 2.87))
(dec730cl (cpu 15.63 gc 0.0))
(dec750cl (cpu 4.4 gc 0.0))
(dec780cl (cpu 3.42 gc 0.0))
(dec8600cl (cpu .81 gc 0.0))
(dec785cl (cpu 2.09 gc 0.0))
(d1 (cpu 1.75 gc 0.0))
(d2 (cpu 3.42 gc 0.0))
(d3 (cpu .677 gc 0.0))
(franz780 ((trlon (lclfno (cpu 3.62 gc 0.0)))
(trloff (lclfno (cpu 13.26 gc 0.0)))
(trlon (lclfyes (cpu 1.7 gc 0.0)))
(trloff (lclfyes (cpu 1.7 gc 0.0)))))
(franz750 ((trlon (lclfno (cpu 5.09 gc 0.0)))
(trloff (lclfno (cpu 19.17 gc 0.0)))
(trlon (lclfyes (cpu 2.7 gc 0.0)))
(trloff (lclfyes (cpu 2.7 gc 0.0)))))
(NIL750 (cpu 5.71 real 5.71)))
(deriv
(sail (cpu 1.81 gc 17.11 wholine 30.23))
(s3600 (cpu 17.54 page 0.05))
(s3600fpa (cpu 17.54 page 0.05))
(s3600ifu (cpu 13.48 page 0.14))
(lmi (cpu 6.4 page 3.7))
(ti-exp (cpu 13.842 page 0.0))
(lmi-mc (cpu 4.0 page 4.7))
(perq (real 71.8))
(s-1 (real 4.998))
(psl20 (cpu 5.643 gc 1.235))
(psl-cray (cpu 1.301 gc 1.169))
(psl-3081 (cpu 1.065 gc 1.172))
(psl750 (cpu 15.368 gc 3.876))
(psl750vms (cpu 20.65 gc 2.66))
(psl780 (cpu 8.585 gc 2.108))
(psl-dn600 (cpu 26.692 gc 5.315))
(psl-dn160 (cpu 14.11 gc 1.7))
(psl-hp200 (cpu 14.82 gc 0.0))
(psl-hp-ux (cpu 15.66 gc 2.975))
(interlispvax780 (cpu+gc 23.104))
(interlisp-10 (cpu 40.21 gc 7.749))
(lm2 (real 23.9))
(dec730cl (cpu 62.54 gc 116.96))
(dec750cl (cpu 24.5 gc 49.63))
(dec780cl (cpu 13.76 gc 26.2))
(dec8600cl (cpu 4.27 gc 9.34))
(dec785cl (cpu 9.65 gc 17.81))
(d1 (cpu 23.9 gc 52.2))
(d2 (cpu 40.3 gc 39.4))
(d3 (cpu 15.7 gc 6.8))
(franz68k
((trlon (lclfno (cpu 15.33 gc 46.45)))
(trloff (lclfno (cpu 39.58 gc 46.53)))
(trlon (lclfyes (cpu 12.8 gc 46.55)))
(trloff (lclfyes (cpu 16.67 gc 46.55)))))
(franz780
((trlon (lclfyes (cpu 11.0 gc 16.0)))
(trloff (lclfyes (cpu 8.3 gc 16.9)))))
(franz750
((trlon (lclfyes (cpu 13.86 gc 22.2)))))
(NIL750 (cpu 22.69 real 24.63)))
(dderiv
(sail (cpu 2.83 gc 18.28 wholine 38.62))
(s-1 (real 3.27))
(s3600 (cpu 18.21 page .03))
(s3600fpa (cpu 18.21 page .03))
(s3600ifu (cpu 13.87 page .16))
(lmi (cpu 7.1 page 4.1))
(ti-exp (cpu 14.392 page 0.0))
(perq (real 77.7))
(psl20 (cpu 6.006 gc 2.07))
(psl-cray (cpu 1.447 gc 1.167))
(psl-3081 (cpu 1.225 gc 1.112))
(psl750 (cpu 19.448 gc 3.893))
(psl750vms (cpu 24.51 gc 2.41))
(psl780 (cpu 10.234 gc 2.108))
(psl-dn600 (cpu 27.296 gc 5.224))
(psl-dn300 (cpu 28.953 gc 6.245))
(psl-dn160 (cpu 14.97 gc 1.79))
(psl-hp200 (cpu 16.03 gc 0.0))
(psl-hp-ux (cpu 16.78 gc 2.907))
(interlispvax780 (cpu+gc 29.968))
(interlisp-10 (cpu 28.067 gc 9.126))
(lm2 (real 23.67))
(d1 (cpu 33.3 gc 59.5))
(d2 (cpu 56.6 gc 43.6))
(d3 (cpu 17.7 gc 6.8))
(franz780
((trloff (lclfyes (cpu 13.52 gc 17.28)))
(trlon (lclfyes (cpu 9.8 gc 17.6)))))
(franz68k
((trlon (lclfno (cpu 17.67 gc 49.53)))
(trloff (lclfno (cpu 41.97 gc 49.53)))
(trlon (lclfyes (cpu 15.43 gc 49.33)))
(trloff (lclfyes (cpu 19.1 gc 49.25)))))
(NIL750 (cpu 26.9 real 29.0)))
(fdderiv
(sail (cpu 2.15 gc 18.28 wholine 34.62))
(ti-exp (cpu 14.142 page 0.0))
(NIL750 (cpu 26.45 real 28.29)))
(div2
(sail
((iterative (cpu .844 gc 8.45 wholine 17.25))
(recursive (cpu 1.28 gc 8.9 wholine 18.08))))
(s-1
((iterative (real 0.82))
(recursive (real 1.49))))
(psl20
((iterative (cpu 2.3 gc 0.0))
(recursive (cpu 2.343 gc 0.0))))
(perq
((iterative (real 28.15))
(recursive (real 40.7))))
(psl-cray
((iterative (cpu .576 gc 0.0))
(recursive (cpu .604 gc 0.0))))
(psl-3081
((iterative (cpu .454 gc 0.0))
(recursive (cpu .428 gc 0.0))))
(psl750
((iterative
(cpu 8.024 gc 2.091))
(recursive
(cpu 7.293 gc 2.788))))
(psl750vms
((iterative
(cpu 9.98 gc 0.0))
(recursive
(cpu 10.03 gc 2.788))))
(psl780
((iterative
(cpu 3.808 gc 1.105))
(recursive
(cpu 3.757 gc 1.071))))
(psl-dn600
((iterative
(cpu 13.205 gc 2.626))
(recursive
(cpu 6.704 gc 2.636))))
(psl-dn160
((iterative
(cpu 6.609 gc .885))
(recursive
(cpu 3.261 gc .886))))
(psl-hp200
((iterative
(cpu 6.34 gc 0.0))
(recursive
(cpu 5.87 gc 0.0))))
(psl-hp-ux
((iterative
(cpu 6.58 gc 0.0))
(recursive
(cpu 5.95 gc 0.0))))
(interlisp-10
((iterative (cpu 131.858 gc 5.026 gc))
(recursive (cpu 68.208 gc 4.96))))
(interlispvax780
((iterative (cpu+gc 3.76))
(recursive (cpu+gc 8.448))))
(s3600
((iterative (cpu 5.53 page 0.01))
(recursive (cpu 6.66 page 0.01))))
(s3600fpa
((iterative (cpu 5.53 page 0.01))
(recursive (cpu 6.66 page 0.01))))
(s3600ifu
((iterative (cpu 4.4 page 0.04))
(recursive (cpu 5.41 page 0.11))))
(lmi
((iterative (cpu 3.8 page 3.6))
(recursive (cpu 5.6 page 3.5))))
(ti-exp
((iterative (cpu 3.6584 page 0.0))
(recursive (cpu 5.3834 page 0.0))))
(lmi-mc
((iterative (cpu 2.9 page 3.0))
(recursive (cpu 2.8 page 3.3))))
(lm2
((iterative (real 8.63))
(recursive (real 12.38))))
(dec730cl ((iterative (cpu 18.21 gc 0.0))
(recursive (cpu 43.89 gc 56.48))))
(dec750cl ((iterative (cpu 14.32 gc 24.85))
(recursive (cpu 9.07 gc 0.0))))
(dec780cl ((iterative (cpu 5.0 gc 0.0))
(recursive (cpu 9.84 gc 12.85))))
(dec8600cl ((iterative (cpu 1.65 gc 0.0))
(recursive (cpu 2.52 gc 4.61))))
(dec785cl ((iterative (cpu 3.36 gc 0.0))
(recursive (cpu 5.98 gc 8.92))))
(d1
((iterative (cpu 23.8 gc 8.5))
(recursive (cpu 24.8 gc 8.5))))
(d2
((iterative (cpu 19.9 gc 16.7))
(recursive (cpu 22.4 gc 17.3))))
(d3
((iterative (cpu 3.43 gc 8.55))
(recursive (cpu 4.09 gc 8.67))))
(franz780
((iterative ((trlon (lclfno (cpu 3.2 gc 16.77)))
(trloff (lclfno (cpu 3.45 gc 16.75)))
(trlon (lclfyes (cpu 3.35 gc 16.85)))
(trloff (lclfyes (cpu 3.33 gc 16.7)))))
(recursive ((trlon (lclfno (cpu 7.68 gc 16.97)))
(trloff (lclfno (cpu 28.88 gc 17.17)))
(trlon (lclfyes (cpu 3.55 gc 16.78)))
(trloff (lclfyes (cpu 3.47 gc 16.75)))))))
(franz750
((iterative ((trlon (lclfno (cpu 5.37 gc 20.47)))
(trloff (lclfno (cpu 5.6 gc 21.28)))
(trlon (lclfyes (cpu 5.5 gc 20.22)))
(trloff (lclfyes (cpu 5.57 gc 21.18)))))
(recursive ((trlon (lclfno (cpu 11.3 gc 20.58)))
(trloff (lclfno (cpu 40.43 gc 21.32)))
(trlon (lclfyes (cpu 5.75 gc 20.53)))
(trloff (lclfyes (cpu 5.57 gc 21.47)))))))
(franz68k
((iterative ((trlon (lclfno (cpu 7.95 gc 24.87)))
(trloff (lclfno (cpu 8.25 gc 24.93)))
(trlon (lclfyes (cpu 7.83 gc 24.8)))
(trloff (lclfyes (cpu 7.9 gc 24.88)))))
(recursive ((trlon (lclfno (cpu 11.13 gc 25.07)))
(trloff (lclfno (cpu 43.3 gc 25.22)))
(trlon (lclfyes (cpu 7.35 gc 24.97)))
(trloff (lclfyes (cpu 7.27 gc 25.22)))))))
(NIL750
((iterative (cpu 9.44 real 9.94))
(recursive (cpu 14.7 real 15.15)))))
(fft
(sail (cpu 4.00 gc 2.91 wholine 9.38))
(s3600 (cpu 4.31 page 0.0))
(s3600ifu (cpu 3.50 page 0.0))
(s3600fpa (cpu 3.19 page 0.0))
(s-1 (real 1.445))
(lmi (cpu 15.9 page 0.07))
(ti-exp (cpu 25.476 page 0.0))
(lmi-mc (cpu 13.3 page 0.15))
(perq (real 59.0))
(psl20 (cpu 35.445 gc 10.765))
(psl750 (cpu 141.729 gc 28.084))
(psl750vms (cpu 127.82 gc 13.59))
(psl-3081 (cpu 7.302 gc 4.020))
(dec730cl (cpu 293.46 gc 240.56))
(dec750cl (cpu 131.59 gc 101.84))
(dec780cl (cpu 32.69 gc 35.56))
(dec8600cl (cpu 9.08 gc 15.65))
(dec785cl (cpu 46.54 gc 37.32))
(psl780 (cpu 60.554 gc 13.447))
; (psl-dn160 (cpu 43.7 gc 41.184))
(psl-hp200 (cpu 132.94 gc 8.58))
(psl-hp-ux (cpu 131.10 gc 12.291))
(interlisp-10 (cpu 12.6 gc 0.0))
(interlispvax780 (cpu+gc 22.792))
(lm2 (real 39.07))
(d1 (cpu 44.2 gc 10.1))
(d2 (cpu 13.2 gc 21.7))
(d3 (cpu 1.57 gc 3.03))
(NIL750 (cpu 35.59 real 38.17)))
(puzzle
(sail (cpu 7.87 gc 0.0 wholine 11.83))
(s3600 (cpu 13.94 page 0.0))
(s3600fpa (cpu 13.94 page 0.0))
(s3600ifu (cpu 11.10 page 0.0))
(psl20 (cpu 15.924 gc 0.0))
(s-1 (real 1.829))
(psl-cray (cpu 1.007 gc 0.0))
(psl-3081 (cpu 1.476 gc 0.0))
(perq (real 75.15))
(psl750 (cpu 35.938 gc 0.0))
(psl750vms (cpu 31.84 gc 0.0))
(psl780 (cpu 16.286 gc 0.0))
(psl-dn600 (cpu 28.923 gc 0.0))
(psl-dn300 (cpu 31.743 gc 0.0))
(psl-dn160 (cpu 29.51 gc 0.0))
(psl-hp200 (cpu 10.85 gc 0.0))
(psl-hp-ux (cpu 12.48 gc 0.0))
(lmi (cpu 28.8 page 0.5))
(ti-exp (cpu 34.542 page 0.0))
(lmi-mc (cpu 25.0 page 0.7))
(dec730cl (cpu 512.56 gc 0.0))
(dec750cl (cpu 231.79 gc 0.0))
(dec780cl (cpu 47.48 gc 0.0))
(dec8600cl (cpu 15.53 gc 0.0))
(dec785cl (cpu 85.44 gc 0.0))
(interlispvax780 (cpu+gc 110.288))
(interlisp-10 (cpu 121.028 gc 7.926))
(lm2 (real 42.93))
(d1 (cpu 50.2 gc 0.0))
(d2 (cpu 91.0 gc 0.0))
(d3 (cpu 14.0 gc 0.0))
(NIL750 (cpu 497.85 real 498.02)))
(triang
(sail (cpu 86.03 gc 6.35 wholine 144.9))
(s3600 (cpu 151.8 page 0.0))
(s3600fpa (cpu 151.8 page 0.0))
(s3600ifu (cpu 116.68 page 0.0))
(lmi (cpu 510.2 page 0.316))
(ti-exp (cpu 570.13 page 0.0))
(lmi-mc (cpu 352.0 page 0.35))
(perq (real 1488.85))
(s-1 (real 62.06))
(psl20 (cpu 86.948 gc 0.0))
(dec730cl (cpu 2865.87 gc 0.0))
(dec750cl (cpu 1021.35 gc 0.0))
(dec780cl (cpu 360.85 gc 0.0))
(dec8600cl (cpu 99.73 gc 0.0))
(dec785cl (cpu 452.82 gc 0.0))
(psl-cray (cpu 14.44 gc 0.0))
(psl-3081 (cpu 25.433 gc 0.0))
(psl750 (cpu 523.192 gc 0.0))
(psl750vms (cpu 439.51 gc 0.0))
(psl780 (cpu 212.194 gc 0.0))
(psl-dn600 (cpu 416.47 gc 0.0))
(psl-dn300 (cpu 439.902 gc 0.0))
; (psl-dn160 (cpu 43.7 gc 41.184))
(psl-hp200 (cpu 261.07 gc 0.0))
(psl-hp-ux (cpu 250.07 gc 0.0))
(interlispvax780 (cpu+gc 1076.54))
(interlisp-10 (cpu 2326.439 gc 1.125))
(lm2 (real 763.0))
(d1 (cpu 856.0 gc 0.462))
(d2 (cpu 1510.0 gc 0.70))
(d3 (cpu 252.2 gc .212))
(NIL750 (cpu 649.73 real 652.35)))
(fread
(sail (cpu .98 gc 0.0 wholine 1.8))
(s3600 (cpu 6.25 page 0.0))
(lmi (cpu 19.7 page 0.55))
(ti-exp (cpu 36.884 page 0.0))
(s3600fpa (cpu 6.25 page 0.0))
(perq (real 26.0))
(psl20 (cpu 5.829 gc 0.0))
(psl-cray (cpu .632 gc 0.0))
(psl-3081 (cpu .403 gc 0.0))
(psl750 (cpu 7.548 gc 0.0))
(psl750vms (cpu 6.2 gc 0.0))
(psl780 (cpu 3.366 gc 0.0))
(psl-dn300 (cpu 6.47 gc 0.0))
(psl-dn600 (cpu 6.823 gc 0.0))
(psl-dn160 (cpu 3.09 gc 0.0))
(psl-hp200 (cpu 5.16 gc 0.0))
(psl-hp-ux (cpu 5.03 gc 0.0))
(interlisp-10 (cpu 4.476 gc 0.0))
(interlispvax780 (cpu+gc 0.128))
(dec730cl (cpu 29.83 gc 0.0))
(dec750cl (cpu 11.21 gc 0.0))
(dec780cl (cpu 7.24 gc 0.0))
(dec8600cl (cpu 2.34 gc 0.0))
(dec785cl (cpu 4.02 gc 0.0))
(lm2 (real 20.67))
(d1 (cpu 8.0 gc 0.13))
(d2 (cpu 6.41 gc 0.0))
(d3 (cpu 1.57 gc 0.0))
(franz780 ((trlon (lclfno (cpu 1.17 gc 0.31)))
(trloff (lclfno (cpu 1.17 gc .19)))
(trlon (lclfyes (cpu 1.18 gc 0.19)))
(trloff (lclfyes (cpu 1.18 gc 0.19)))))
(franz750 ((trlon (lclfno (cpu 2.02 gc 0.32)))
(trloff (lclfno (cpu 2.04 gc 0.35)))
(trlon (lclfyes (cpu 1.99 gc 0.33)))
(trloff (lclfyes (cpu 2.05 gc 0.33)))))
(franz68k ((trlon (lclfno (cpu 2.29 gc 0.52)))
(trloff (lclfno (cpu 2.28 gc 0.77)))
(trlon (lclfyes (cpu 2.28 gc 0.52)))
(trloff (lclfyes (cpu 2.28 gc 0.77)))))
(NIL750 (cpu 27.78 real 28.02)))
(fprint
(sail (cpu .78 gc 0.402 wholine 1.32))
(s3600 (cpu 3.1 page .1))
(lmi (cpu 16.6 page 11.2))
(ti-exp (cpu 29.318 page 0.0))
(s3600fpa (cpu 3.1 page .1))
(perq (real 20.0))
(psl20 (cpu 4.778 gc 0.0))
(psl-cray (cpu .378 gc 0.0))
(psl-3081 (cpu .342 gc 0.0))
(psl750 (cpu 5.338 gc 0.0))
(psl750vms (cpu 3.9 gc 0.0))
(psl780 (cpu 2.193 gc 0.0))
(psl-dn600 (cpu 4.43 gc 0.0))
(psl-dn160 (cpu 1.89 gc 0.0))
(psl-hp200 (cpu 9.37 gc 0.0))
(psl-hp-ux (cpu 3.40 gc 0.0))
(psl-dn300 (cpu 4.191 gc 0.0))
(lm2 (real 12.09))
(interlispvax780 (cpu+gc 0.608))
(interlisp-10 (cpu 4.451 gc 0.0))
(dec730cl (cpu 18.3 gc 0.0))
(dec750cl (cpu 6.08 gc 0.0))
(dec780cl (cpu 3.94 gc 0.0))
(dec8600cl (cpu 1.08 gc 0.0))
(dec785cl (cpu 2.32 gc 0.0))
(d1 (cpu 13.7 gc 0.4))
(d2 (cpu 14.9 gc 0.0))
(d3 (cpu 2.93 gc 0.0))
(franz780 ((trlon (lclfno (cpu 0.62 gc 0.0)))
(trloff (lclfno (cpu 0.63 gc 0.0)))
(trlon (lclfyes (cpu 0.63 gc 0.0)))
(trloff (lclfyes (cpu 0.64 gc 0.0)))))
(franz750 ((trlon (lclfno (cpu 1.23 gc 0.0)))
(trloff (lclfno (cpu 1.07 gc 0.0)))
(trlon (lclfyes (cpu 1.11 gc 0.0)))
(trloff (lclfyes (cpu 1.10 gc 0.0)))))
(franz68k ((trlon (lclfno (cpu 1.43 gc 0.0)))
(trloff (lclfno (cpu 1.42 gc 0.0)))
(trlon (lclfyes (cpu 1.42 gc 0.0)))
(trloff (lclfyes (cpu 1.43 gc 0.0)))))
(NIL750 (cpu 37.65 real 38.23)))
(tprint
(sail (cpu .81 gc 0.0 wholine 6.52))
(s3600 (cpu 7.8 page 0.0))
(lmi (cpu 7.2 page 0.62))
(ti-exp (cpu 21.217 page 0.0))
(s3600fpa (cpu 7.8 page 0.0))
(perq (real 22.6))
(interlispvax780 (cpu+gc 11.472))
(psl20 (cpu 4.253 gc 0.0))
(psl-cray (cpu .202 gc 0.0))
(psl-3081 (cpu .318 gc 0.0))
(psl750 (cpu 4.284 gc 0.0))
(psl750vms (cpu 2.63 gc 0.0))
(psl780 (cpu 1.921 gc 0.0))
(psl-dn600 (cpu 2.731 gc 0.0))
(psl-dn300 (cpu 2.724 gc 0.0))
(psl-dn160 (cpu 1.845 gc 0.0))
(psl-hp200 (cpu 11.19 gc 0.0))
(psl-hp-ux (cpu 7.82 gc 0.0))
(interlisp-10 (cpu 4.727 gc 0.0))
(dec730cl (cpu 12.56 gc 0.0))
(dec750cl (cpu 4.11 gc 0.0))
(dec780cl (cpu 2.85 gc 0.0))
(dec8600cl (cpu 0.70 gc 0.0))
(dec785cl (cpu 1.54 gc 0.0))
(lm2 (real 17.67))
(d1 (cpu 34.0 gc 0.0))
(d2 (cpu 29.2 gc 0.0))
(d3 (cpu 5.55 gc 0.0))
(franz780 ((trlon (lclfno (cpu 0.52 gc 0.0)))
(trloff (lclfno (cpu 0.52 gc 0.0)))
(trlon (lclfyes (cpu 0.53 gc 0.0)))
(trloff (lclfyes (cpu 0.48 gc 0.0)))))
(franz750 ((trlon (lclfno (cpu 0.87 gc 0.0)))
(trloff (lclfno (cpu 0.87 gc 0.0)))
(trlon (lclfyes (cpu 0.88 gc 0.0)))
(trloff (lclfyes (cpu 0.87 gc 0.0)))))
(franz68k ((trlon (lclfno (cpu 1.65 gc 0.0)))
(trloff (lclfno (cpu 1.62 gc 0.0)))
(trlon (lclfyes (cpu 1.62 gc 0.0)))
(trloff (lclfyes (cpu 1.65 gc 0.0)))))
(NIL750 (cpu 47.55 real 58.31)))
(frpoly
(s-1
((2r (real 0.0038))
(2r2 (real 0.0035))
(2r3 (real 0.0036))
(5r (real 0.038))
; (5r2 (real 0.037))
(5r3 (real 0.038))
(10r (real 0.421))
; (10r2 (real 0.106))
(10r3 (real 0.430))
(15r (real 2.874))
; (15r2 (real 0.162))
(15r3 (real 3.096))))
(sail
((2r (cpu .005 gc 0.0 wholine 0.02))
(2r2 (cpu .005 gc 0.0 wholine 0.02))
(2r3 (cpu .004 gc 0.0 wholine 0.02))
(5r (cpu .042 gc 0.0 wholine 0.02))
(5r2 (cpu .067 gc 0.0 wholine 1.06))
(5r3 (cpu .042 gc 0.0 wholine 0.08))
(10r (cpu .467 gc 0.79 wholine 1.9))
(10r2 (cpu .926 gc 5.94 wholine 12.48))
(10r3 (cpu .47 gc 2.98 wholine 5.89))
(15r (cpu 3.15 gc 4.82 wholine 12.57))
(15r2 (cpu 9.43 gc 50.48 wholine 94.77))
(15r3 (cpu 3.16 gc 48.86 wholine 81.33))))
(psl-dn300
((2r (cpu 0.4 gc 0.0))
(2r2 (cpu 0.13 gc 0.0))
(2r3 (cpu 0.43 gc 0.0))
(5r (cpu 0.298 gc 0.0))
(5r2 (cpu 1.634 gc 0.0))
(5r3 (cpu 0.445 gc 0.0))
(10r (cpu 3.456 gc 0.0))
(10r2 (cpu 32.684 gc 0.0))
(10r3 (cpu 5.617 gc 0.0))
(15r (cpu 70.273 gc 3.279))))
(psl-dn600
((2r (cpu 0.35 gc 0.0))
(2r2 (cpu 0.142 gc 0.0))
(2r3 (cpu 0.42 gc 0.0))
(5r (cpu 0.293 gc 0.0))
(5r2 (cpu 1.775 gc 0.0))
(5r3 (cpu 0.443 gc 0.0))
(10r (cpu 3.601 gc 0.0))
(10r2 (cpu 33.333 gc 0.0))
(10r3 (cpu 5.691 gc 0.0))
(15r (cpu 75.108 gc 3.218))
(15r2 (cpu 485.284 gc 23.656))
(15r3 (cpu 44.203 gc 4.884))))
(psl-hp200
((2r (cpu 0.07 gc 0.0))
(2r2 (cpu 0.15 gc 0.0))
(2r3 (cpu 0.09 gc 0.0))
(5r (cpu 0.25 gc 0.0))
(5r2 (cpu 1.34 gc 0.0))
(5r3 (cpu 0.41 gc 0.0))
(10r (cpu 2.24 gc 0.0))
(10r2 (cpu 26.06 gc 0.0))
(10r3 (cpu 4.28 gc 0.0))
(15r (cpu 39.99 gc 0.0))
(15r2 (cpu 410.2 gc 2.52))
(15r3 (cpu 30.66 gc 0.0))))
(psl-hp-ux
((2r (cpu 0.06 gc 0.0))
(2r2 (cpu 0.15 gc 0.0))
(2r3 (cpu 0.14 gc 0.0))
(5r (cpu 0.24 gc 0.0))
(5r2 (cpu 1.60 gc 0.0))
(5r3 (cpu 0.41 gc 0.0))
(10r (cpu 2.448 gc 0.0))
(10r2 (cpu 30.515 gc 0.0))
(10r3 (cpu 4.726 gc 0.0))
(15r (cpu 47.19 gc 0.0))
(15r2 (cpu 476.426 gc 4.3))
(15r3 (cpu 33.728 gc 0.0))))
(psl780
((2r (cpu 0.001 gc 0.0))
(2r2 (cpu 0.068 gc 0.0))
(2r3 (cpu 0.034 gc 0.0))
(5r (cpu 0.204 gc 0.0))
(5r2 (cpu 0.901 gc 0.0))
(5r3 (cpu 0.289 gc 0.0))
(10r (cpu 2.006 gc 0.0))
(10r2 (cpu 13.022 gc 0.0))
(10r3 (cpu 3.06 gc 0.0))
(15r (cpu 35.479 gc 1.394))
(15r2 (cpu 161.619 gc 8.67))
(15r3 (cpu 21.845 gc 1.564))))
(psl750
((2r (cpu 0.068 gc 0.0))
(2r2 (cpu 0.289 gc 0.0))
(2r3 (cpu 0.119 gc 0.0))
(5r (cpu 0.408 gc 0.0))
(5r2 (cpu 1.581 gc 0.0))
(5r3 (cpu 0.493 gc 0.0))
(10r (cpu 4.539 gc 0.0))
(10r2 (cpu 27.778 gc 0.0))
(10r3 (cpu 7.191 gc 0.0))
(15r (cpu 81.668 gc 3.162))
(15r2 (cpu 394.179 gc 22.27))
(15r3 (cpu 61.115 gc 3.638))))
(psl750vms
((2r (cpu 0.07 gc 0.0))
(2r2 (cpu 0.16 gc 0.0))
(2r3 (cpu 0.07 gc 0.0))
(5r (cpu 0.33 gc 0.0))
(5r2 (cpu 1.54 gc 0.0))
(5r3 (cpu 0.49 gc 0.0))
(10r (cpu 3.54 gc 0.0))
(10r2 (cpu 23.38 gc 0.0))
(10r3 (cpu 5.59 gc 0.0))
(15r (cpu 63.76 gc 0.0))
(15r2 (cpu 293.68 gc 8.05))
(15r3 (cpu 40.79 gc 0.0))))
(psl20
((2r (cpu 0.022 gc 0.0))
(2r2 (cpu 0.039 gc 0.0))
(2r3 (cpu 0.023 gc 0.0))
(5r (cpu 0.094 gc 0.0))
(5r2 (cpu 0.378 gc 0.0))
(5r3 (cpu 0.137 gc 0.0))
(10r (cpu 0.921 gc 0.0))
(10r2 (cpu 6.46 gc 0.0))
(10r3 (cpu 1.509 gc 0.0))
(15r (cpu 12.68 gc 0.0))
(15r2 (cpu 68.195 gc 0.0))
(15r3 (cpu 11.138 gc 0.0))))
(psl-cray
((2r (cpu 0.0013 gc 0.0))
(2r2 (cpu 0.0013 gc 0.0))
(2r3 (cpu 0.0019 gc 0.0))
(5r (cpu 0.013 gc 0.0))
; (5r2 (cpu 0.009 gc 0.0))
(5r3 (cpu 0.0201 gc 0.0))
(10r (cpu 0.142 gc 0.0))
; (10r2 (cpu 0.033 gc 0.0))
(10r3 (cpu 0.238 gc 0.0))
(15r (cpu .950 gc 0.0))
; (15r2 (cpu .050 gc 0.0))
(15r3 (cpu 1.666 gc 0.0))))
(psl-3081
((2r (cpu 0.004 gc 0.0))
(2r2 (cpu 0.010 gc 0.0))
(2r3 (cpu 0.005 gc 0.0))
(5r (cpu 0.024 gc 0.0))
(5r2 (cpu 0.096 gc 0.0))
(5r3 (cpu 0.032 gc 0.0))
(10r (cpu 0.251 gc 0.0))
(10r2 (cpu 0.352 gc 0.0))
(10r3 (cpu 0.229 gc 0.0))
(15r (cpu 4.049 gc 0.0))
(15r2 (cpu 20.138 gc 1.348))
(15r3 (cpu 2.542 gc 0.0))))
(dec730cl ((2r (cpu 0.17 gc 0.0))
(2r2 (cpu 0.17 gc 0.0))
(2r3 (cpu 0.16 gc 0.0))
(5r (cpu 0.94 gc 0.0))
(5r2 (cpu 1.46 gc 0.0))
(5r3 (cpu 1.29 gc 0.0))
(10r (cpu 8.91 gc 0.0))
(10r2 (cpu 17.3 gc 0.0))
(10r3 (cpu 12.8 gc 0.0))
(15r (cpu 55.45 gc 0.0))
(15r2 (cpu 139.49 gc 122.14))
(15r3 (cpu 85.16 gc 61.52))))
(dec750cl ((2r (cpu 0.06 gc 0.0))
(2r2 (cpu 0.06 gc 0.0))
(2r3 (cpu 0.06 gc 0.0))
(5r (cpu 0.37 gc 0.0))
(5r2 (cpu 0.6 gc 0.0))
(5r3 (cpu 0.48 gc 0.0))
(10r (cpu 3.38 gc 0.0))
(10r2 (cpu 7.25 gc 0.0))
(10r3 (cpu 4.69 gc 0.0))
(15r (cpu 21.51 gc 0.0))
(15r2 (cpu 57.0 gc 51.82))
(15r3 (cpu 31.05 gc 26.8))))
(dec780cl ((2r (cpu 0.03 gc 0.0))
(2r2 (cpu 0.04 gc 0.0))
(2r3 (cpu 0.04 gc 0.0))
(5r (cpu 0.23 gc 0.0))
(5r2 (cpu 0.36 gc 0.0))
(5r3 (cpu 0.3 gc 0.0))
(10r (cpu 2.13 gc 0.0))
(10r2 (cpu 4.45 gc 0.0))
(10r3 (cpu 2.89 gc 0.0))
(15r (cpu 13.21 gc 0.0))
(15r2 (cpu 34.48 gc 26.99))
(15r3 (cpu 17.84 gc 13.78))))
(dec8600cl ((2r (cpu 0.01 gc 0.0))
(2r2 (cpu 0.01 gc 0.0))
(2r3 (cpu 0.02 gc 0.0))
(5r (cpu 0.08 gc 0.0))
(5r2 (cpu 0.12 gc 0.0))
(5r3 (cpu 0.10 gc 0.0))
(10r (cpu .64 gc 0.0))
(10r2 (cpu 1.40 gc 0.0))
(10r3 (cpu 0.97 gc 0.0))
(15r (cpu 4.13 gc 0.0))
(15r2 (cpu 10.45 gc 9.37))
(15r3 (cpu 5.84 gc 0.00))))
(dec785cl ((2r (cpu 0.02 gc 0.0))
(2r2 (cpu 0.02 gc 0.0))
(2r3 (cpu 0.03 gc 0.0))
(5r (cpu 0.14 gc 0.0))
(5r2 (cpu 0.24 gc 0.0))
(5r3 (cpu 0.19 gc 0.0))
(10r (cpu 1.34 gc 0.0))
(10r2 (cpu 2.81 gc 0.0))
(10r3 (cpu 1.77 gc 0.0))
(15r (cpu 8.36 gc 0.0))
(15r2 (cpu 21.83 gc 18.95))
(15r3 (cpu 11.03 gc 9.68))))
(s3600
((2r (cpu .01 page 0.0))
(2r2 (cpu .02 page 0.0))
(2r3 (cpu .01 page 0.0))
(5r (cpu .13 page 0.0))
(5r2 (cpu .32 page 0.0))
(5r3 (cpu .13 page 0.0))
(10r (cpu 1.28 page 0.0))
(10r2 (cpu 4.37 page 0.0))
(10r3 (cpu 1.29 page 0.0))
(15r (cpu 7.43 page 0.0))
(15r2 (cpu 33.81 page 0.08))
(15r3 (cpu 8.09 page 0.01))))
(s3600fpa
((2r (cpu .01 page 0.0))
(2r2 (cpu .02 page 0.0))
(2r3 (cpu .01 page 0.0))
(5r (cpu .13 page 0.0))
(5r2 (cpu .32 page 0.0))
(5r3 (cpu .13 page 0.0))
(10r (cpu 1.28 page 0.0))
(10r2 (cpu 4.37 page 0.0))
(10r3 (cpu 1.29 page 0.0))
(15r (cpu 7.43 page 0.0))
(15r2 (cpu 33.81 page 0.08))
(15r3 (cpu 8.09 page 0.01))))
(s3600ifu
((2r (cpu .01 page 0.0))
(2r2 (cpu .02 page 0.0))
(2r3 (cpu .01 page 0.0))
(5r (cpu .10 page 0.0))
(5r2 (cpu .25 page 0.0))
(5r3 (cpu .10 page 0.0))
(10r (cpu .93 page 0.0))
(10r2 (cpu 3.30 page 0.01))
(10r3 (cpu 1.0 page 0.0))
(15r (cpu 5.70 page 0.02))
(15r2 (cpu 25.08 page 0.19))
(15r3 (cpu 6.3 page 0.0))))
(lmi
((2r (cpu .0097 page 0.0033))
(2r2 (cpu .0135 page 0.0045))
(2r3 (cpu .0138 page 0.0041))
(5r (cpu .102 page 0.028))
(5r2 (cpu .163 page 0.057))
(5r3 (cpu .157 page 0.043))
(10r (cpu 1.2 page 0.22))
(10r2 (cpu 2.3 page 0.68))
(10r3 (cpu 1.6 page 0.45))
(15r (cpu 7.8 page 1.28))
(15r2 (cpu 18.9 page 5.5))
(15r3 (cpu 11.0 page 2.47))))
(ti-exp
((2r (cpu .01667 page 0.0))
(2r2 (cpu .01667 page 0.0))
(2r3 (cpu .01667 page 0.0))
(5r (cpu .133 page 0.0))
(5r2 (cpu .1667 page 0.0))
(5r3 (cpu .1667 page 0.0))
(10r (cpu 1.725 page 0.0))
(10r2 (cpu 2.8167 page 0.0))
(10r3 (cpu 2.0667 page 0.0))
(15r (cpu 13.392 page 0.0))
(15r2 (cpu 28.017 page 0.0))
(15r3 (cpu 18.342 page 0.0))))
(s3600fpa
((2r (cpu .009 page 0.0))
(2r2 (cpu .017 page 0.0))
(2r3 (cpu .009 page 0.0))
(5r (cpu .88 page 0.0))
(5r2 (cpu .26 page 0.0))
(5r3 (cpu .094 page 0.0))
(10r (cpu 1.01 page 0.0))
(10r2 (cpu 5.1 page 0.0))
(10r3 (cpu 1.07 page 0.0))
(15r (cpu 6.4 page 0.0))
(15r2 (cpu 50.3 page 0.0))
(15r3 (cpu 6.8 page 0.0))))
(lm2
((2r (cpu .020 page 0.0))
(2r2 (cpu .022 page 0.0))
(2r3 (cpu .022 page 0.0))
(5r (cpu .20 page 0.0))
(5r2 (cpu .25 page 0.0))
(5r3 (cpu .24 page 0.0))
(10r (cpu 2.29 page 0.0))
(10r2 (cpu 3.52 page 0.0))
(10r3 (cpu 2.73 page 0.0))
(15r (cpu 18.55 page 0.0))
(15r2 (cpu 30.90 page 0.0))
(15r3 (cpu 22.43 page 0.0))))
(franz780
((2r ((trlon (lclfno (cpu 0.02 gc 0.0)))
(trloff (lclfno (cpu 0.05 gc 0.0)))
(trlon (lclfyes (cpu 0.02 gc 0.0)))
(trloff (lclfyes (cpu 0.02 gc 0.0)))))
(2r2 ((trlon (lclfno (cpu 0.02 gc 0.0)))
(trloff (lclfno (cpu 0.07 gc 0.0)))
(trlon (lclfyes (cpu 0.02 gc 0.0)))
(trloff (lclfyes (cpu 0.02 gc 0.0)))))
(2r3 ((trlon (lclfno (cpu 0.03 gc 0.0)))
(trloff (lclfno (cpu 0.07 gc 0.0)))
(trlon (lclfyes (cpu 0.02 gc 0.0)))
(trloff (lclfyes (cpu 0.02 gc 0.0)))))
(5r ((trlon (lclfno (cpu 0.02 gc 0.0)))
(trloff (lclfno (cpu 0.6 gc 0.0)))
(trlon (lclfyes (cpu 0.15 gc 0.0)))
(trloff (lclfyes (cpu 0.15 gc 0.0)))))
(5r2 ((trlon (lclfno (cpu 0.38 gc 0.0)))
(trloff (lclfno (cpu 1.18 gc 0.42)))
(trlon (lclfyes (cpu 0.67 gc 0.37)))
(trloff (lclfyes (cpu 0.67 gc 0.37)))))
(5r3 ((trlon (lclfno (cpu 0.22 gc 0.0)))
(trloff (lclfno (cpu 0.98 gc 0.4)))
(trlon (lclfyes (cpu 3.85 gc 1.83)))
(trloff (lclfyes (cpu 3.85 gc 1.83)))))
(10r ((trlon (lclfno (cpu 2.33 gc 0.0)))
(trloff (lclfno (cpu 7.67 gc 0.88)))
(trlon (lclfyes (cpu 2.6 gc 0.83)))
(trloff (lclfyes (cpu 2.6 gc 0.83)))))
(10r2 ((trlon (lclfno (cpu 8.0 gc 2.27)))
(trloff (lclfno (cpu 14.87 gc 3.83)))
(trlon (lclfyes (cpu 8.87 gc 3.7)))
(trloff (lclfyes (cpu 8.87 gc 3.7)))))
(10r3 ((trlon (lclfno (cpu 2.6 gc 0.0)))
(trloff (lclfno (cpu 8.62 gc 1.43)))
(trlon (lclfyes (cpu 3.85 gc 1.83)))
(trloff (lclfyes (cpu 3.85 gc 1.83)))))
(15r ((trlon (lclfno (cpu 20.6 gc 4.02)))
(trloff (lclfno (cpu 52.52 gc 5.32)))
(trlon (lclfyes (cpu 18.48 gc 5.63)))
(trloff (lclfyes (cpu 18.48 gc 5.63)))))
(15r2 ((trlon (lclfno (cpu 86.5 gc 30.38)))
(trloff (lclfno (cpu 132.8 gc 43.0)))
(trlon (lclfyes (cpu 93.87 gc 41.75)))
(trloff (lclfyes (cpu 93.87 gc 41.75)))))
(15r3 ((trlon (lclfno (cpu 25.08 gc 6.77)))
(trloff (lclfno (cpu 54.27 gc 6.95)))
(trlon (lclfyes (cpu 21.7 gc 6.97)))
(trloff (lclfyes (cpu 21.7 gc 6.97)))))))
(franz68k
((2r ((trlon (lclfno (cpu 0.05 gc 0.0)))
(trloff (lclfno (cpu 0.1 gc 0.0)))
(trlon (lclfyes (cpu 0.02 gc 0.0)))
(trloff (lclfyes (cpu 0.03 gc 0.0)))))
(2r2 ((trlon (lclfno (cpu 0.05 gc 0.0)))
(trloff (lclfno (cpu 0.1 gc 0.0)))
(trlon (lclfyes (cpu 0.03 gc 0.0)))
(trloff (lclfyes (cpu 0.05 gc 0.0)))))
(2r3 ((trlon (lclfno (cpu 0.05 gc 0.0)))
(trloff (lclfno (cpu 0.08 gc 0.0)))
(trlon (lclfyes (cpu 0.05 gc 0.0)))
(trloff (lclfyes (cpu 0.05 gc 0.0)))))
(5r ((trlon (lclfno (cpu 0.37 gc 0.0)))
(trloff (lclfno (cpu 0.9 gc 0.0)))
(trlon (lclfyes (cpu 0.33 gc 0.0)))
(trloff (lclfyes (cpu 0.45 gc 0.0)))))
(5r2 ((trlon (lclfno (cpu 0.8 gc 0.0)))
(trloff (lclfno (cpu 1.32 gc 0.0)))
(trlon (lclfyes (cpu 0.73 gc 0.0)))
(trloff (lclfyes (cpu 0.85 gc 0.0)))))
(5r3 ((trlon (lclfno (cpu 0.48 gc 0.0)))
(trloff (lclfno (cpu 0.98 gc 0.0)))
(trlon (lclfyes (cpu .43 gc 0.0)))
(trloff (lclfyes (cpu .53 gc 0.0)))))
(10r ((trlon (lclfno (cpu 4.72 gc 0.0)))
(trloff (lclfno (cpu 10.43 gc 0.0)))
(trlon (lclfyes (cpu 4.17 gc 0.0)))
(trloff (lclfyes (cpu 5.63 gc 0.0)))))
(10r2 ((trlon (lclfno (cpu 15.717 gc 2.17)))
(trloff (lclfno (cpu 21.35 gc 0.0)))
(trlon (lclfyes (cpu 15.07 gc 2.08)))
(trloff (lclfyes (cpu 16.53 gc 0.0)))))
(10r3 ((trlon (lclfno (cpu 5.7 gc 4.25)))
(trloff (lclfno (cpu 11.43 gc 0.0)))
(trlon (lclfyes (cpu 5.17 gc 4.2)))
(trloff (lclfyes (cpu 6.65 gc 0.0)))))
(15r ((trlon (lclfno (cpu 34.67 gc 4.48)))
(trloff (lclfno (cpu 73.02 gc 6.8)))
(trlon (lclfyes (cpu 31.12 gc 4.4)))
(trloff (lclfyes (cpu 42.7 gc 6.77)))))
(15r2 ((trlon (lclfno (cpu 180.5 gc 30.83)))
(trloff (lclfno (cpu 218.67 gc 21.65)))
(trlon (lclfyes (cpu 176.77 gc 30.73)))
(trloff (lclfyes (cpu 188.3 gc 21.68)))))
(15r3 ((trlon (lclfno (cpu 40.88 gc 20.55)))
(trloff (lclfno (cpu 79.72 gc 17.23)))
(trlon (lclfyes (cpu 37.6 gc 20.53)))
(trloff (lclfyes (cpu 49.18 gc 17.18)))))))
(franz750
((2r ((trlon (lclfno (cpu 0.05 gc 0.0)))
(trloff (lclfno (cpu 0.08 gc 0.0)))
(trlon (lclfyes (cpu 0.03 gc 0.0)))
(trloff (lclfyes (cpu 0.03 gc 0.0)))))
(2r2 ((trlon (lclfno (cpu 0.03 gc 0.0)))
(trloff (lclfno (cpu 0.12 gc 0.0)))
(trlon (lclfyes (cpu 0.03 gc 0.0)))
(trloff (lclfyes (cpu 0.03 gc 0.0)))))
(2r3 ((trlon (lclfno (cpu 0.03 gc 0.0)))
(trloff (lclfno (cpu 0.08 gc 0.0)))
(trlon (lclfyes (cpu 0.02 gc 0.0)))
(trloff (lclfyes (cpu 0.02 gc 0.0)))))
(5r ((trlon (lclfno (cpu 0.35 gc 0.0)))
(trloff (lclfno (cpu 0.93 gc 0.0)))
(trlon (lclfyes (cpu 0.27 gc 0.0)))
(trloff (lclfyes (cpu 0.27 gc 0.0)))))
(5r2 ((trlon (lclfno (cpu 1.18 gc 0.57)))
(trloff (lclfno (cpu 1.8 gc 0.57)))
(trlon (lclfyes (cpu 0.48 gc 0.37)))
(trloff (lclfyes (cpu 0.48 gc 0.37)))))
(5r3 ((trlon (lclfno (cpu 1.02 gc 0.67)))
(trloff (lclfno (cpu 1.62 gc 0.63)))
(trlon (lclfyes (cpu .3 gc 1.83)))
(trloff (lclfyes (cpu .3 gc 1.83)))))
(10r ((trlon (lclfno (cpu 5.37 gc 1.38)))
(trloff (lclfno (cpu 12.07 gc 1.37)))
(trlon (lclfyes (cpu 3.15 gc 0.0)))
(trloff (lclfyes (cpu 3.15 gc 0.0)))))
(10r2 ((trlon (lclfno (cpu 14.95 gc 5.82)))
(trloff (lclfno (cpu 22.27 gc 5.93)))
(trlon (lclfyes (cpu 11.82 gc 3.52)))
(trloff (lclfyes (cpu 11.82 gc 3.52)))))
(10r3 ((trlon (lclfno (cpu 7.27 gc 2.95)))
(trloff (lclfno (cpu 13.87 gc 2.88)))
(trlon (lclfyes (cpu 3.47 gc 0.0)))
(trloff (lclfyes (cpu 3.47 gc 0.0)))))
(15r ((trlon (lclfno (cpu 37.23 gc 9.12)))
(trloff (lclfno (cpu 82.57 gc 9.38)))
(trlon (lclfyes (cpu 29.47 gc 6.65)))
(trloff (lclfyes (cpu 29.47 gc 6.65)))))
(15r2 ((trlon (lclfno (cpu 155.45 gc 67.15)))
(trloff (lclfno (cpu 202.68 gc 67.47)))
(trlon (lclfyes (cpu 129.57 gc 48.22)))
(trloff (lclfyes (cpu 129.57 gc 48.22)))))
(15r3 ((trlon (lclfno (cpu 41.47 gc 11.0)))
(trloff (lclfno (cpu 86.83 gc 11.22)))
(trlon (lclfyes (cpu 36.7 gc 11.2)))
(trloff (lclfyes (cpu 36.7 gc 11.2)))))))
(NIL750
((2r (cpu .04 real .0 4))
(2r2 (cpu .15 real 0.15))
(2r3 (cpu .05 real 0.05))
(5r (cpu .36 real 0.36))
(5r2 (cpu 2.15 real 2.15))
(5r3 (cpu .42 real 0.43))
(10r (cpu 3.85 real 3.88))
(10r2 (cpu 38.71 real 38.99))
(10r3 (cpu 4.64 real 4.66))
(15r (cpu 24.93 real 25.81))
(15r2 (cpu 479.48 real 482.87))
(15r3 (cpu 30.7 real 31.18)))))))
;;; Routines to access the data base
;;; A routine like real-time gets the CADR of the entry
;;; under the implementation and the name of the implementation too.
;;; for destru and SAIL it gets:
;;; (cpu 2.16 gc 5.38 wholine 8.43)
(defun safe-plus (x y)
(cond ((and (numberp x)
(numberp y))
(//$ (float (fix (times 100.0 (plus x y)))) 100.0))))
;;; Finds things in a structure like:
;;; (cpu 2.16 gc 5.38 wholine 8.43)
;;; ↑
;;; x
(defun flassq (x l)
(do ((l l (cddr l)))
((or (eq (car l) x)
(null l))
(cadr l))))
;;; Finds things in a structure like:
;;; ((trlon (lclfno (cpu 0.52 gc 0.0)))
;;; (trloff (lclfno (cpu 0.52 gc 0.0)))
;;; (trlon (lclfyes (cpu 0.53 gc 0.0)))
;;; ↑ ↑
;;; x y
;;; (trloff (lclfyes (cpu 0.48 gc 0.0))))
(defun locate (x y entry)
(do ((entry entry (cdr entry)))
((or (and (eq (caar entry) x)
(eq (car (cadr (car entry))) y))
(null entry))
(cadr (cadr (car entry))))))
(defmacro real-time-compute (impl entry)
`(caseq ,impl
(sail (flassq 'wholine ,entry))
((s3600 s3600ifu s3600fpa lmi lmi-nc lmi-mc ti-exp)
(safe-plus (cadr ,entry)
(cadddr ,entry)))
((s-1 interlispvax780 lm2 perq) (cadr ,entry))
((dec780cl dec730cl dec750cl dec785cl dec8600cl
interlisp-10) (safe-plus (cadr ,entry)
(cadddr ,entry)))
((psl750 psl780 psl-dn300 psl-dn600 psl20 psl-cray psl-dn160
psl-3081 psl-hp200 psl-hp-ux psl750vms)
(safe-plus (cadr ,entry)
(cadddr ,entry)))
((d1 d2 d3) (safe-plus (cadr ,entry)
(cadddr ,entry)))
((franz780 franz750 franz68k)
(let ((entry (locate 'trlon 'lclfno ,entry)))
(safe-plus (cadr ,entry)
(cadddr ,entry))))
((franz780yy franz750yy franz68kyy)
(let ((entry (locate 'trlon 'lclfyes ,entry)))
(safe-plus (cadr ,entry)
(cadddr ,entry))))
((franz780yn franz750yn franz68kyn)
(let ((entry (locate 'trlon 'lclfno ,entry)))
(safe-plus (cadr ,entry)
(cadddr ,entry))))
((franz780ny franz750ny franz68kny)
(let ((entry (locate 'trloff 'lclfyes ,entry)))
(safe-plus (cadr ,entry)
(cadddr ,entry))))
((franz780nn franz750nn franz68knn)
(let ((entry (locate 'trloff 'lclfno ,entry)))
(safe-plus (cadr ,entry)
(cadddr ,entry))))
(nil750 (cadddr ,entry))))
(defmacro cpu-time-compute (impl entry)
`(caseq ,impl
((dec780cl sail dec750cl dec785cl dec730cl dec8600cl)
(flassq 'cpu ,entry))
(interlisp-10 (flassq 'cpu ,entry))
((psl750 psl780 psl-dn300 psl-dn600 psl20 psl-cray
psl-3081 psl-dn160 psl-hp200 psl-hp-ux psl750)
(flassq 'cpu ,entry))
((s3600 s3600ifu s3600fpa lmi ti-exp
lmi-nc lmi-mc) (cadr ,entry))
((s-1 interlispvax780 lm2 perq) (cadr ,entry))
((d1 d2 d3) (cadr ,entry))
((franz780 franz750 franz68k)
(let ((entry (locate 'trlon 'lclfno ,entry)))
(cadr ,entry)))
((franz780yy franz750yy franz68kyy)
(let ((entry (locate 'trlon 'lclfyes ,entry)))
(cadr ,entry)))
((franz780yn franz750yn franz68kyn)
(let ((entry (locate 'trlon 'lclfno ,entry)))
(cadr ,entry)))
((franz780ny franz750ny franz68kny)
(let ((entry (locate 'trloff 'lclfyes ,entry)))
(cadr ,entry)))
((franz780nn franz750nn franz68knn)
(let ((entry (locate 'trloff 'lclfno ,entry)))
(cadr ,entry)))
(nil750 (cadr ,entry))))
(defun real-time (impl entry)
(real-time-compute impl entry))
(defun tinit-real-time (impl entry)
(let ((entry (cadr (assq 'initialize entry))))
(real-time-compute impl entry)))
(defun traverse-real-time (impl entry)
(let ((entry (cadr (assq 'traverse entry))))
(real-time-compute impl entry)))
(defun iterative-real-time (impl entry)
(let ((entry (cadr (assq 'iterative entry))))
(real-time-compute impl entry)))
(defun recursive-real-time (impl entry)
(let ((entry (cadr (assq 'recursive entry))))
(real-time-compute impl entry)))
(defun 2r-real-time (impl entry)
(let ((entry (cadr (assq '2r entry))))
(real-time-compute impl entry)))
(defun 2r2-real-time (impl entry)
(let ((entry (cadr (assq '2r2 entry))))
(real-time-compute impl entry)))
(defun 2r3-real-time (impl entry)
(let ((entry (cadr (assq '2r3 entry))))
(real-time-compute impl entry)))
(defun 5r-real-time (impl entry)
(let ((entry (cadr (assq '5r entry))))
(real-time-compute impl entry)))
(defun 5r2-real-time (impl entry)
(let ((entry (cadr (assq '5r2 entry))))
(real-time-compute impl entry)))
(defun 5r3-real-time (impl entry)
(let ((entry (cadr (assq '5r3 entry))))
(real-time-compute impl entry)))
(defun 10r-real-time (impl entry)
(let ((entry (cadr (assq '10r entry))))
(real-time-compute impl entry)))
(defun 10r2-real-time (impl entry)
(let ((entry (cadr (assq '10r2 entry))))
(real-time-compute impl entry)))
(defun 10r3-real-time (impl entry)
(let ((entry (cadr (assq '10r3 entry))))
(real-time-compute impl entry)))
(defun 15r-real-time (impl entry)
(let ((entry (cadr (assq '15r entry))))
(real-time-compute impl entry)))
(defun 15r2-real-time (impl entry)
(let ((entry (cadr (assq '15r2 entry))))
(real-time-compute impl entry)))
(defun 15r3-real-time (impl entry)
(let ((entry (cadr (assq '15r3 entry))))
(real-time-compute impl entry)))
(defun cpu-time (impl entry)
(cpu-time-compute impl entry))
(defun tinit-cpu-time (impl entry)
(let ((entry (cadr (assq 'initialize entry))))
(cpu-time-compute impl entry)))
(defun traverse-cpu-time (impl entry)
(let ((entry (cadr (assq 'traverse entry))))
(cpu-time-compute impl entry)))
(defun iterative-cpu-time (impl entry)
(let ((entry (cadr (assq 'iterative entry))))
(cpu-time-compute impl entry)))
(defun recursive-cpu-time (impl entry)
(let ((entry (cadr (assq 'recursive entry))))
(cpu-time-compute impl entry)))
(defun 2r-cpu-time (impl entry)
(let ((entry (cadr (assq '2r entry))))
(cpu-time-compute impl entry)))
(defun 2r2-cpu-time (impl entry)
(let ((entry (cadr (assq '2r2 entry))))
(cpu-time-compute impl entry)))
(defun 2r3-cpu-time (impl entry)
(let ((entry (cadr (assq '2r3 entry))))
(cpu-time-compute impl entry)))
(defun 5r-cpu-time (impl entry)
(let ((entry (cadr (assq '5r entry))))
(cpu-time-compute impl entry)))
(defun 5r2-cpu-time (impl entry)
(let ((entry (cadr (assq '5r2 entry))))
(cpu-time-compute impl entry)))
(defun 5r3-cpu-time (impl entry)
(let ((entry (cadr (assq '5r3 entry))))
(cpu-time-compute impl entry)))
(defun 10r-cpu-time (impl entry)
(let ((entry (cadr (assq '10r entry))))
(cpu-time-compute impl entry)))
(defun 10r2-cpu-time (impl entry)
(let ((entry (cadr (assq '10r2 entry))))
(cpu-time-compute impl entry)))
(defun 10r3-cpu-time (impl entry)
(let ((entry (cadr (assq '10r3 entry))))
(cpu-time-compute impl entry)))
(defun 15r-cpu-time (impl entry)
(let ((entry (cadr (assq '15r entry))))
(cpu-time-compute impl entry)))
(defun 15r2-cpu-time (impl entry)
(let ((entry (cadr (assq '15r2 entry))))
(cpu-time-compute impl entry)))
(defun 15r3-cpu-time (impl entry)
(let ((entry (cadr (assq '15r3 entry))))
(cpu-time-compute impl entry)))
(defun safe-quotient (x y)
(cond ((and (numberp x)
(numberp y))
(cond ((zerop x) y)
((zerop y) x)
(t (round (quotient x y)))))))
(defun round (x)
(//$ (float (fix (+$ .5 (*$ (float x) 100.0)))) 100.0))